- or download this
C:\>perl -MO=Deparse -wl
#! perl -wl
...
print '-' }->cxontinue;
- syntax OK
- or download this
display {find Critter "Fred"} 'Height', 'Weight';
- or download this
$fred = Critter->find("Fred");
$fred->display('Height', 'Weight');
- or download this
Critter->find("Fred")->display('Height', 'Weight');