update: I could've sworn you didn't have that deparse stuff there a second ago, anyway, I suppose it's just indirect object notation ie ---> new CGI; eq CGI->new; --->new {'CGI'} eq CGI->new;.C:\>perl -MO=Deparse -wl #! perl -wl use strict; for my $i (1 .. 10) { print $i; } cxontinue { print "#"; print "-"; } __END__ foreach my $i (1 .. 10) { print $i; } do { print '#'; print '-' }->cxontinue; - syntax OK
`perldoc perlobj' has an example, and here it is ;)
$fred = find Critter "Fred";
display $fred 'Height', 'Weight';
These could be combined into one statement by using a BLOCK in the
indirect object slot:
For C++ fans, there's also a syntax using -> notation that does exactly the same thing. The parentheses are required if there are any arguments.display {find Critter "Fred"} 'Height', 'Weight';
or in one statement,$fred = Critter->find("Fred"); $fred->display('Height', 'Weight');
Critter->find("Fred")->display('Height', 'Weight');
| MJD says "you can't just make shit up and expect the computer to know what you mean, retardo!" | |
| I run a Win32 PPM repository for perl 5.6.x and 5.8.x -- I take requests (README). | |
| ** The third rule of perl club is a statement of fact: pod is sexy. |
Edit by tye, take paragraphs, long lines out of PRE
In reply to Re: Why does this even compile?
by PodMaster
in thread Why does this even compile?
by bart
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |