Select Code to Download

perl -MImage::Size -le"print for imgsize shift" foo.png

#!/usr/bin/perl -l

...
F<http://www.perlmonks.org/?node_id=295108>

=cut