Select Code to Download

foreach my $city ( @myCities ) {
    # $city is 'Baltimore' the fist time
    # $city is 'Chicago' the second time
    # etc.
}

foreach my $city ( @myCities ) {
    print "\$city = '$city'\n";
}