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


in reply to cross platform scripts

I actually posted a node with a solution to a similar problem in an older thread just a few days ago - The thread in question can be found here.

In this thread I posted a reference to the if module which allows the selective loading of modules based upon conditional tests. In the thread which I have referenced, I posted a snippet of the code would load separate configuration modules based upon the operating system of execution:

use if ( $^O eq 'MSWin32' ), 'MyAppWin32'; use if ( $^O ne 'MSWin32' ), 'MyAppUnix';

Perhaps this is of use to you :-)

 

perl -le 'print+unpack("N",pack("B32","00000000000000000000001000100001"))'