tlm's code is correct, so if there's anything not working, I suspect you're not removing the newline from the filename (a line from a filehandle will always end in newline unless EOF happens first)

you should do something like:

print "Enter basename: ";
my $filename = <STDIN>;
chomp $filename;
[download]

You can check that the variables actually contain what you think they do by printing them out with delimiters around them:

print "File=>>$filename<<\n";
[download]