http://qs1969.pair.com?node_id=54215


in reply to !@#$%^&*

Here's a version for you (preserving its behavior) that'll work on Unix and Win32.
$_=('%#(/@*(((@!./((%)@+%),@(!#+%)@'.(($^O^'`.*).dn')eq'-}}@@W\\'? '#/.{o|~{':'o$%-`(*"'))^'@@@@``][\`@@@\@@[`{@[@`@@@@@[~@@@[O\\^[';`$_`