Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight
 
PerlMonks  

Re: Re: Re: Initialize array

by aijin (Monk)
on Jul 03, 2001 at 23:12 UTC ( #93640=note: print w/replies, xml ) Need Help??


in reply to Re: Re: Initialize array
in thread Initialize array

Instead of your if ($number > $#lines | $number <=0) section, you could try something like this:

if (defined $lines[$number1 - 1]) { print $lines[$number1 - 1]; print "\n"; } else { print "No link at that index\n"; }

This will check if there's a value at the spot in the array. This will benefit you if, in the future, you expand your code to delete links, or if you accidentally have blank lines in your input file.

As always, TMTOWTDI.

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others imbibing at the Monastery: (4)
As of 2016-12-08 02:46 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    On a regular basis, I'm most likely to spy upon:













    Results (134 votes). Check out past polls.