Hi all,

 

is possible to use  multiple strings and agminated sub routine call name without object oriented programming?

I’ve done following test (see below), but in the real script isn’t possible to use objects.

Has anyone a idea how it’s works?

 

Thanks

 

Markus

 

 

my $r = "r_";

my $s = "s";

 

$r .= $s;

my $a = and_now->new();

$a->$r;

 

{package and_now;

            sub new {

                        my $class = shift;

                        my $self = bless {'_ip' => shift}, $class;

            }

 

            sub r_s { print "Hallo "}

}

_______________________________________________
Perl-Win32-Users mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to