Hello PilotinControl,

You just need to loop on $choose until it is defined:

...
my $choose = <STDIN>;
$choose = <STDIN> until defined $choose;    # <-- Add this line
chomp $choose;
...
[download]

That will remove the warnings you are currently seeing.

Hope that helps,