Select Code to Download

my $waypoint = 'N43.4589 W112.9443';
my $latitude;
...
foreach ( split / /, $waypoint ) {
    ( /^[NnSs]/ ) ? $latitude : $longitude = $_;
}