Help for this page
my @parts = split '|', $id; # ouch! what trivial error! is: /\|/ see c +horoba below ... # or simply my $filename = (split '|', $id)[0]; # ouch! what trivial error! is: / +\|/ see choroba below