Select Code to Download

use strict;
open INPUT, "<flea.txt" or die "Blerch: $!\n";
...
local *STDIN=*INPUT;

while (<STDIN>) {print}