Select Code to Download

use warnings;
use strict;
...
}
print "GOTCHA $lf !!! \n";

use warnings;
use strict;
...
}
print "GOTCHA $hladane !!! \n";