5 lines
84 B
Perl
5 lines
84 B
Perl
|
#!/bin/perl
|
||
|
|
my $subref = sub { print @_ ; };
|
||
|
|
&$subref('a','b','c');
|
||
|
|
print "\n";
|