Help for this page

Select Code to Download


  1. or download this
    $expr =~ s~\\~~g if ($^O eq 'Win32' || $^O eq 'dos');
  2. or download this
    D:\>perl -e "print $^O"
MSWin32
D:\>e:\perl805\bin\perl -e "print $^O"
MSWin32
  3. or download this
    $expr =~ s~\\~~g if ($^O eq 'MSWin32' || $^O eq 'dos');