Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

Re^2: Simulate a head lice infection

by Lawliet (Curate)
on Jan 23, 2009 at 02:06 UTC ( #738356=note: print w/replies, xml ) Need Help??


in reply to Re: Simulate a head lice infection
in thread Simulate a head lice infection

Hmm, you say "less noisily using a heredoc", I say "mess up tabbing of the file making it look ugly".

Maybe use say instead of print, and use commas instead of ; print -- that may look less noisy and save the tabs.

Iono, its just an annoyance I have with heredoc.

And you didn't even know bears could type.

Replies are listed 'Best First'.
Re^3: Simulate a head lice infection
by johngg (Canon) on Jan 23, 2009 at 22:57 UTC

    One way you can indent HEREDOCs is to substitute the leading spaces in a map.

    $ perl -e ' $x = 1; if( $x ) { print map { s{^ }{}gm; $_ } <<" EOT"; Line 1 Line 2 \$x is $x Line 4 EOT }' Line 1 Line 2 $x is 1 Line 4 $

    This really is not a serious suggestion. It is rather horrible, probably inefficient and it would be a nightmare to maintain in a script. It would easily break if code is moved around and logical depth (thus indentation) changes or if you use an editor that decides off its own bat to use tabs instead of spaces when auto-indenting.

    I just post the code as a curio. Downvote if nauseated.

    Cheers,

    JohnGG

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others meditating upon the Monastery: (3)
As of 2022-01-18 01:58 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    In 2022, my preferred method to securely store passwords is:












    Results (52 votes). Check out past polls.

    Notices?