Help for this page

Select Code to Download

Select or download this

my $logname = $ENV{LOGNAME};
$logname =~ m/(.*)/;
$logname = quotemeta($logname);