Mega Code Archive

 

Categories / Perl / Language Basics

 

Lexical variables

#!/usr/bin/perl use warnings; my $record = 4; print "We're at record ", $record, "\n"; {     my $record;     $record = 7;     print "Inside the block, we're at record ", $record, "\n"; } print "We're still at record ", $record, "\n";