my @comics=glob 'e:/perl/comics/*';
# or 'e:/perl/comics/*.png', according to your description