Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much
 
PerlMonks  

Re: The nature of my most pressing need(s):

by emcs (Scribe)
on May 14, 2002 at 04:24 UTC ( #166368=note: print w/ replies, xml ) Need Help??


in reply to The nature of my most pressing need(s):

Okay: My coding skills are still weak.

But I realize that all good monks must eventually post some real code.

So: Here goes; I have been working with the tutorial node.

#!perl -w use strict; print "Do you like deep perlish questions at the voting booth?\n"; my $input = <>; chomp $input; if ($input eq 'y') { while ( <DATA> ) { chomp; my @SelfActualization = split /\|/; print join(' ', @SelfActualization), "\n"; } }else{ if ($input eq 'n'){ print "Non of the above for me. MU."; } } __END__ You have no hangups.|You love Psychiatrists.|You have strong Ego.| High Self esteem.|Isn't life just great.

The dogs bark; but the caravan rolls on.

emcs


Comment on Re: The nature of my most pressing need(s):
Download Code

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (9)
As of 2014-09-23 03:28 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (210 votes), past polls