Help for this page
sub get_files { return sort { ... } glob($_[0]."/*.{jpg,jpeg,png}") or die($_[0]." contained no images\n"); }