solaris5.8 $ test.perl | od -t ax1 0000000 $ V A R 1 sp = sp q r / ( ? x - i 24 56 41 52 31 20 3d 20 71 72 2f 28 3f 78 2d 69 0000020 s m : @ @ ( [ A - Z $ # @ _ # ] 73 6d 3a 40 40 28 5b 41 2d 5a 24 23 40 5f 23 5d 0000040 * ) sp ( ? ! sp [ A - Z a - z 0 - 2a 29 20 28 3f 21 20 5b 41 2d 5a 61 2d 7a 30 2d 0000060 9 $ # @ _ ] sp ) nul nul lf ) / ; lf 39 24 23 40 5f 5d 20 29 00 00 0a 29 2f 3b 0a #### solaris5.8 $ test-slashes.perl | od -t ax1 0000000 $ V A R 1 sp = sp q r / ( ? x - i 24 56 41 52 31 20 3d 20 71 72 2f 28 3f 78 2d 69 0000020 s m : @ @ ( [ A - Z # ] * ) sp ( 73 6d 3a 40 40 28 5b 41 2d 5a 23 5d 2a 29 20 28 0000040 ? ! sp [ A - Z a - z 0 - 9 $ # @ 3f 21 20 5b 41 2d 5a 61 2d 7a 30 2d 39 24 23 40 0000060 _ ] sp ) can lf ) / ; lf 5f 5d 20 29 18 0a 29 2f 3b 0a ##### linux2.4 $ test-slashes.perl | od -t ax1 0000000 $ V A R 1 sp = sp q r / ( ? x - i 24 56 41 52 31 20 3d 20 71 72 2f 28 3f 78 2d 69 0000020 s m : @ @ ( [ A - Z # ] * ) sp ( 73 6d 3a 40 40 28 5b 41 2d 5a 23 5d 2a 29 20 28 0000040 ? ! sp [ A - Z a - z 0 - 9 $ # @ 3f 21 20 5b 41 2d 5a 61 2d 7a 30 2d 39 24 23 40 0000060 _ ] sp ) s lf ) / ; lf 5f 5d 20 29 73 0a 29 2f 3b 0a