From: redmist <szu...@gm...> - 2007-10-31 03:44:04
|
I got the solution as following sub show_text { my $obj = shift; my $obj_name = $obj->{-name}; print $obj_name; } -- View this message in context: http://www.nabble.com/return-the-text-of-an-object-tf4625127.html#a13502387 Sent from the perl-win32-gui-users mailing list archive at Nabble.com. |