Re: typglob problem

Dear Monk, Try the below,

 use strict;
 use warnings;

 our $cure = "cure";
 our @cure = ('one', 'two', 'three');

 &cure(*cure);

 sub cure {
         my $new = shift;
         print "$$new";
         print "@$new";
 }
[download]

I hope, you would have understood by seeing the code. Yes, ofcourse my variables won't available in symbol table.

Also, read the Variables and Scoping tutorials for more.

In Section Seekers of Perl Wisdom