my $pathinfo = $ENV{PATH_INFO} || '';