Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw

Re: how to make this perl code run

by choroba (Bishop)
on May 16, 2013 at 14:12 UTC ( #1033838=note: print w/replies, xml ) Need Help??

in reply to how to make this perl code run

I can make it compile and run without touching the programme at all:
echo 1 > perl -I.
لսႽ ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ

Replies are listed 'Best First'.
Re^2: how to make this perl code run
by LanX (Bishop) on May 16, 2013 at 16:01 UTC
    Well I consider any command line tricks cheating, cause otherwise you could also start calling a recompiled Perl.

    Did you try putting the logic in a BEGIN block... (don't know if it does the trick).

    But why did you call the OP's script Doesn't make it easier to understand what you are doing...

    Cheers Rolf

    ( addicted to the Perl Programming Language)

    PS: I'd try a source-filter approach! =)

      I tried putting the logic into a BEGIN block, but without success. It is perhaps too late on line 6.

      When testing code samples, I name them,, and so on. The next day, I remove all of them and start again from 1. It is shorter than using the node's id in the name, but still lets me keep several answers ready for improvement if there are objections, which simple would not do :-)

      لսႽ ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ

        This untested code should work ...

        ... BEGIN { sub hi {}; sub hello {}; sub hola {}; }

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1033838]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (8)
As of 2018-06-20 14:14 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (116 votes). Check out past polls.