Help for this page
(my $name = $str) =~ s{.*/}{}; # basename
(my $path = $str) =~ s{$name}{};
www.com | www.net | www.org
No recent polls found