[plug] Perl Query...

[Kim Covil]

> Any ideas??

my $obj = new Class;
if ($obj->can($bink)) {
	$obj->$bink(@args);
} else {
	die "This obj doesn't have a $bink method";
}

Cheers

Kim

-- 
====================================================================== 
Kim Covil - CSIRO Exploration & Mining   E-mail: kimc at ned.dem.csiro.au
            PO Box 437, Nedlands,        Tel: +61 8 9284 8425   ,-_!\
            Western Australia  6009      Fax: +61 8 9389 1906  /     \
                                                               *_,-._/
=================================================================== v 
   Please direct all personal e-mail to kimbotha at covil.com.au