ms shell> DOSKEY RPATH=perl -e "@wp=split ';', $ENV{path};@wp=map {s#\\#/#g; $_;} @wp; @PP=($uROOT=$ENV{'HOMEDRIVE'})? map {s#\A$uROOT##i; s#\A([^^$uROOT]) (?:\:\/)#'/'. lc ${1} .((${1} eq $uROOT)? '':'/')#xei;$_;} @wp : @wp; @PP=map{s#\:##; $_;} @PP; print join qq'\n', @PP;"