Passing an array and modifying it,as a reference : Parameter « Subroutine « 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 » Parameter

Passing an array and modifying it,as a reference

   



#!/usr/bin/perl -w





@array = (1,2,3,4,5,6,7,8,9);



print "Before: @array.\n";



mod_array( \@array );



print "After:  @array.\n";



sub mod_array {

    my( $arrayref ) = $_[0];



    @$arrayref = reverse( @$arrayref );

}

Related examples in the same category

1.	Swap array value by using the sub range
2.	Passing Arrays
3.	Pass file handle global reference to a subroutine
4.	Pass reference to a subroutine to another subroutine
5.	Pass two array reference to a subroutine
6.	Passing by reference with pointers
7.	Passing References to a Subroutine
8.	Passing a range of value to a subroutine
9.	Passing array to a subroutine
10.	Passing arrays to a function
11.	Passing different number of parameter to a subroutine
12.	Passing hash to a subroutine
13.	Passing parameters to subroutines
14.	Passing two values to a subroutine
15.	displays all the arguments
16.	Using shift(@_) to get value passed into a subroutine
17.	shift parameter
18.	Subroutine parameter default value
19.	output the subroutine arguments using special variable @_
20.	Is a parameter defined
21.	The loop displays each individual argument

java2s.com | Contact Us | Privacy Policy

All other trademarks are property of their respective owners.