Select Code to Download

#!/usr/bin/perl -w
use WWW::Mechanize;
...
            print $input."\n";
        }
}

https://www.google.com/
0
...
btnG
btnI
gbv

https://www.southwest.com/
-1