Beefy Boxes and Bandwidth Generously Provided by pair Networks
good chemistry is complicated,
and a little bit messy -LW
 
PerlMonks  

Is Bug in version of Activeperl

by madtoperl (Hermit)
on Apr 10, 2006 at 10:03 UTC ( [id://542246]=perlquestion: print w/replies, xml ) Need Help??

madtoperl has asked for the wisdom of the Perl Monks concerning the following question:

This node falls below the community's threshold of quality. You may see it by logging in.

Replies are listed 'Best First'.
Re: Is Bug in version of Activeperl
by astaines (Curate) on Apr 10, 2006 at 10:31 UTC

    Hi, Two things :

    1. What is it meant to do?
    2. What is the output in both versions of ActivePerl?

    You might also put the Perl code in 'code' tags - See this node for guidance and this node for information on linking to other resources.

    Good luck!

    -- Anthony Staines
Re: Is Bug in version of Activeperl
by syphilis (Archbishop) on Apr 10, 2006 at 10:48 UTC
    Seems to work ok in builds 817 and 638 (which is the oldest perl I have):
    D:\pscrpt>perl try.pl Help! Help me!
    Why are you still using perl 5.6 ? (Just curious.)

    Cheers, Rob
Re: Is Bug in version of Activeperl
by wulvrine (Friar) on Apr 10, 2006 at 11:36 UTC
    Works for me on per v5.8.8b816.
    Help! Help Me!

    Is there a reason you are using an older build? If not, have you tried updating your Active Perl distrubution?

Re: Is Bug in version of Activeperl
by chargrill (Parson) on Oct 07, 2006 at 02:44 UTC

    How odd, someone by the name of "Norio Suzuki" seems to have reported the exact same bug back in 2001, and it was indeed fixed in ActivePerl build 630.

    ------- Description from SUZUKI, Norio 2001-11-06 14:36 The script shown below works on ActivePerl build 629, but not works on build 630. ---^ system "echo Help!"; system "command/c echo Help me! > help.tmp"; open FILE, "type help.tmp |"; @file = <FILE>; close FILE; for (@file) {print} ---$


    --chargrill
    s**lil*; $*=join'',sort split q**; s;.*;grr; &&s+(.(.)).+$2$1+; $; = qq-$_-;s,.*,ahc,;$,.=chop for split q,,,reverse;print for($,,$;,$*,$/)
Re: Is Bug in version of Activeperl
by Mr. Muskrat (Canon) on Apr 10, 2006 at 17:17 UTC
    Why are using system to send text to the display and a file when print will do the same thing without the overhead involved in making system calls?
Re: Is Bug in version of Activeperl
by Anonymous Monk on Apr 11, 2006 at 05:02 UTC
    Which version of perl are ActivePerl builds 629 and 630?
      Builds 629 and 630 are perl 5.6.1.

      Cheers,
      Rob

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: perlquestion [id://542246]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others lurking in the Monastery: (4)
As of 2024-04-24 01:06 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found