my $name = "abba?@fzabb=11'a"
$name =~ s/([\\\/:\*\?"<>\|])/\%unpack('H*', $1)/g;
# name is now: abba%3f@fzabb=11'a%22