问一个正则表达式的意思
sub convert_LATITUDE
{
my $lat = $_[0] || 0;
if( $lat =~ /(\d+)-(\d+)-(\d+\.?\d*)\-?(N|S)/ || 0 )
{
$lat = ($1 + $2/60 + $3/3600);
if( $4 =~ /S/ ) {
$lat *= -1;
}
return $lat;
}
elsif( $lat =~ /^-?\d+\.?\d*$/ || 0 ) { return $lat }
return 0;
小弟没学过正则表达式,实在看不透彻,请乡亲们给看看其中的两个正咋表达式是什么意思,谢谢了