programming-examples/perl/Subroutine/Anonymous Subroutines.pl

5 lines
84 B
Perl
Raw Normal View History

2019-11-15 12:59:38 +01:00
#!/bin/perl
my $subref = sub { print @_ ; };
&$subref('a','b','c');
print "\n";