Re: Ternary Operator with Subroutine

[biohisham]

When you assign to a reference a value (in this case an anonymous sub), dereference that reference to access its value:

hisham@bioslayer:~$ perl -
my $subref = sub{print 'a',"\n";};
(my $test)?print 'c' : $subref->(); #dereference with infix arrow oper
+ator
__END__
a
hisham@bioslayer:~$ perl -
my $subref = sub{print 'a',"\n"};
(my $test)?print 'c' : &{$subref}; #dereference with &{}
__END__
a

check %perldoc perlsub