Mega Code Archive

 

Categories / Perl / Subroutine

 

Duplicate global and local variable name (use strict;)

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