Select Code to Download

my $connButton = $mw->Button(
    -text       => "Connect",
...
            say "Select one network, please.";
        }
    }

        open my $FILE, '<', "ESSID", or die "Can't open file: $!";

...
        $i=$i+1;

}