Select Code to Download

my $newyork;
my $miami;
...
} else {
  statement;
}

while ( <DATA> ) {
  given( $_ ) {
...
    }
  }
}

while ( <DATA> )
{
...
    expr
  }
}