Select Code to Download

if ($output = `firefox`)
    {print "no browser found\n"}

BROWSER: {
    for my $dir (split /:/, $ENV{PATH}) {
...
    }
    print "no browser found.\n";
}