Passing different number of parameter to a subroutine

   


#!/usr/bin/perl -w

use strict;

log_warning("A", "B");
log_warning("C");
log_warning();

sub log_warning {
    my $message = shift || "Something's wrong";
    my $time    = shift || localtime; # Default to now.
    print "[$time] $message\n";
}

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 an array and modifying it,as a reference
7.	Passing by reference with pointers
8.	Passing References to a Subroutine
9.	Passing a range of value to a subroutine
10.	Passing array to a subroutine
11.	Passing arrays to a function
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

Passing different number of parameter to a subroutine : Parameter « Subroutine « Perl

Related examples in the same category