Select Code to Download

my $text = <<'END';
Name: Alice Allison Age: 23
Occupation: Spy
...
$age_for{$1} = $2;
}
print Dumper(\%age_for);

$VAR1 = {
‘Bob Barkely’ => ‘45’,
...
‘Carol Carson’ => ‘44’,
‘Prince’ => ‘53’
};