Help for this page
Select Code to Download
Select
or
download this
if( my( $first, $last) = $line =~ /^([^ ]+) ([^ ]+)/ ){ }