Select Code to Download

use warnings;
use strict;
...
printf("   \$count: >%s<\n", $count);       # (\d+)     => 04
printf("     \$ext: >%s<\n\n", $ext);       # (\w+)     => png
...