Using my : my « Subroutine « Perl






Using my

   


#!/usr/bin/perl -w

use strict;

my $record;
$record = 4;
print "We're at record ", $record, "\n";

{
    my $record;
    $record = 7;
    print "Inside the block, we're at record ", $record, "\n";
}

print "Outside, we're still at record ", $record, "\n";

   
    
    
  








Related examples in the same category

1.Using my if statement
2.Using my to declare the local variable in a subroutine
3.my ($program, $exitCode) = @_; creates two local variables, $program and $exitCode, from @_.
4.my variable
5.my variable is initialized each time
6.my, local and global variable
7.My value scope
8.Define local variable in subroutine by using my
9.The scope of my variables
10.Use my to declare local variable