hello friends,
i have a doubt in the concept of blessing.
package Animal;
sub named {
my $class = shift;
my $name = shift;
bless \$name, $class;
}
sub eat{
my $class = shift;
$class = ref($class) || $class;
my $food = shift;
print "$class eats $food\n";
}
my $talking = Animal->named("xyz");
$talking ->eat("hay");
#################################################
#################################################
In this program i dont understand what is the function of bless??? and where
xyz is stored.
May be the concept of bless function is not clear to me. can u please
expliain me in detail abt this funtion which will be definitely helpful to
me.
thank you
Regards
Babylakshmi
_________________________________________________________________
Get your FREE download of MSN Explorer at http://explorer.msn.com/intl.asp
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
