In addition to what
duelafn said, it was also pointed out in an earlier thread by
Fletch...
$^0 returns what OS perl was
built on... not on what it's running.
See this node:
Re^2: OS400 Pace - architecture?
regexes
-------------------------
Nothing in the world can take the place of persistence. Talent will not; nothing is more common than unsuccessful men with talent. Genius will not; unrewarded genius is almost a proverb. Education will not; the world is full of educated derelicts. Persistence and determination are omnipotent. The slogan "press on" has solved and always will solve the problems of the human race.
-- Calvin Coolidge, 30th President of the USA.