Select Code to Download

    if ( $_ =~ /^NEW YORK:\s+(\S+)/ ) {
            $newyork = $1;
            $newyork = $newyork || 'NA';
            next;
    }

#!/usr/bin/perl
use warnings;
...
MIAMI:   heat
LA:        lakers