Perl, resolving link download name

I am trying to write a script in Perl that generates URL list from web page, than goes over URL list and downloads the linked files.

the problem is that the generated URL's links look something like

www.example.com/download.php?file=Li9OaW50ZW5kby9ORVMvVVNBLzEwIFlhcmQgRmlnaHQuemlw

when i place this link in browser it knows the true file name (i.e. cards.zip), i don't know how to get it using Perl.

how can i get using Perl the link's 'true' file name ?

Solution

Inspect the headers, specifically Content-Disposition.

How do I use Perl keys() from a function return value?
How can I pass an array to a C function in Perl XS?
Using IPC::Run inside Mojo::IOLoop::Subprocess
Can the Perl compiler tell me if I have an unchecked exception in my code?
What is the perl equivalent of MAX_INT?
Two occurrences of a variable declared with 'my' but in two different packages in the same file
How to send asynchronous json using Perl to an PHP url?
Perl How to use DBIx::Class to return data beautifully
Perl: inline variable substitution not working
Sorting an array of hashes by multiple keys in Perl
Perl - How do I sort an array of arrays based on the value of a column while maintaining the order specified in a hash?
How do I sort a hash of hashes by value using Perl?
The simple way to sort based on values in a hash in Perl
Perl adding parameters into a loop
Perl search and replace words in file
Printing utf-8 text in Perl debugger using x command
Date Time Format, Perl Oracle SQL
Why is my hand-created JSON not recognizing the object in an array?
RSA using EME-OAEP padding with SHA-256 as hash function
Why does running the same regex twice yield different results?
Preserve YAML order perl
How to check if $j->{component} is empty in perl?
Destructive @_ operation and passing @_ in the same statement
How can I run a Perl script from Emacs?
Perl - positions of regex match in string
How do i figure out which dependences of a CPAN distribution require a compiler?
How can I convert a string to a number in Perl?
Add a backslash to specific lines per negative lookaround with sed or perl
How can you prevent forked child processes from disconnecting DBD::Pg connections, when you have no access to $dbh?
How to pass a string with spaces as http POST data using curl