Help for this page

Select Code to Download

Select or download this
```
1/2/3/123.jpg
8/6/7/8675309.jpg
```

Select or download this

my $fullpath = $file; # Not just the number, but e.g. "7893.jpg"
$fullpath =~ s|(\w{1,3}).*|join('/',split(//,$1),$&)|e 
  or die "Bad filename $file";