Regular Expression Perl

  1. Home
  2. Perl
  3. Regular Expression
  4. Back referencing
while(){
    ($first, $last)=/(\w+) (\w+)/;   # Could be: (\S+) (\S+)/
    print "$last, $first\n";
}
__DATA__
    First Last