http://qs321.pair.com?node_id=165680


in reply to Compatibility on Win32 and UNIX

You could check the  $^O variable and switch the path format depending on the result.

$^O eq "hpux" ? $path='/path/thisway':$path='\path\thisway';