(unless) usage


XP is just a number
	PerlMonks

(unless) usage

by Lhamo_rin (Friar)

on Jun 30, 2003 at 13:12 UTC ( [id://270159]=perlquestion: print w/replies, xml )

Need Help??

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

Can someone tell me why the following code would give me a syntax error on the Label line?


sub open_file {
my $success = open RF, "/bin/.saved_points"
unless ($succeed) {
         my $fail = MainWindow->new():
         $fail->Label(-text => "File Failed to open")-> pack();
}
}
[download]

Comment on (unless) usage Download Code

Replies are listed 'Best First'.
Re: (unless) usage by particle (Vicar) on Jun 30, 2003 at 13:14 UTC
`my $success = open RF, "/bin/.saved_points"; ## missing semi-colon` [download] also, you set `success`, but check `succeed` in the next line. are you using warnings? or strict? it might help. ~Particle accelerates	[reply] [d/l] [select]
Re: (unless) usage by broquaint (Abbot) on Jun 30, 2003 at 13:15 UTC
You're missing a semi-colon on the 2nd line `my $success = open RF, "/bin/.saved_points" <-- needs a semi-colon` [download] Also the 4th line has a colon instead of a semi-colon `my $fail = MainWindow->new(): <-- should be a ;` [download] HTH `_________ broquaint`	[reply] [d/l] [select]
Re: (unless) usage by Zaxo (Archbishop) on Jun 30, 2003 at 14:42 UTC
Also, you have a colon where you want a semicolon in line 5: `my $fail = MainWindow->new(); # ^` [download] After Compline, Zaxo	[reply] [d/l]

Back to Seekers of Perl Wisdom

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

node history
Node Type: perlquestion [id://270159]
Approved by Corion
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others pondering the Monastery: (7)

As of 2024-04-16 11:41 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Today I Learned

Voting Booth^?

No recent polls found