Help for this page

Select Code to Download

Select or download this

{
    my @chunks  = split /\\/ => $file, 3;
...
    my $path    = $chunks [2];
    ...
}