For a quick script I whip up to do something one time:

use strict;
use warnings;
[download]

For anything more:

use strict;
use warnings;
use Getopt::Long qw(:config no_ignore_case); #bundling
use Pod::Usage;
[download]

... and anything else needed for the script (eg: IO::Socket for networking).