in reply to Re: APPerl: "osname=cosmo" problem
in thread APPerl: "osname=cosmo" problem

Nice trick, thanks!

% perl -le 'print $^O'                                           
darwin

% ./perl.com -le 'print $^O'                                           
cosmo

% ./perl.com -MPOSIX -le 'BEGIN{@_=POSIX::uname;$^O=lc $_[0]}print $^O'                 
darwin

% ./perl.com -le 'BEGIN{$^O="MSWin32"}use File::Spec;print for @File::Spec::ISA'
File::Spec::Win32