Using my : my « Subroutine « Perl

Home
Perl
1.Array
2.CGI
3.Class
4.Data Type
5.Database
6.File
7.GUI
8.Hash
9.Language Basics
10.Network
11.Regular Expression
12.Report
13.Statement
14.String
15.Subroutine
16.System Functions
17.Win32
18.XML
Perl » Subroutine » my 
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
java2s.com  | Contact Us | Privacy Policy
Copyright 2009 - 12 Demo Source and Support. All rights reserved.
All other trademarks are property of their respective owners.