Hi,

Think you meant $#var = -1;

Why you don't use undef?

use warnings;
use strict;
my @a = (1,2,3);
undef @a;
print "a=",@a if @a;
[download]

Normally you don't have two care about how Perl manages the memory. But you could use a debugger to take a look of what he is doing...

You allways should write clean code. You can free memory manually or you can let the vars get out of scope.

@a = (1,2,3);
for my $v (@a) {
  print $v, "\n";
}
print 'Still exist $v? ';
print "No!\n" unless defined $v;
[download]

And consider using some pragmas, like use strict and use warnings, and why not, also use diagnostics.

Regards,

:-)