Select Code to Download

# assuming DATA pipe opened for reading...
...

# end local code block
}

# open
open (DATA,"/path/to/webpage.htm") || die "Can't open page - $!";
...
# store
my $match = $1;