Help for this page
perl -MImage::Size -le"print for imgsize shift" foo.png
#!/usr/bin/perl -l ... F<http://www.perlmonks.org/?node_id=295108> =cut