Select Code to Download

my $re = qr/
    First\ Name: \s+ (.+)\n
...
while ($line=~/$re/g) {
  print "<$1> <$2>\n";
}