- or download this
$commands{$cmd}{function}($param)
- or download this
$commands{$cmd}->{function}->($param)
- or download this
$ perl -MO=Deparse -e 'print $a{funclist}[0](4);'
print $a{'funclist'}[0](4);
...
$ perl -MO=Deparse -e 'print $a{funclist}->[0]->(4);'
print $a{'funclist'}[0](4);
-e syntax OK
- or download this
@/=map{[/./g]}qw/.h_nJ Xapou cets krht ele_ r_ra/;
map{y/X_/\n /;print}map{pop@$_}@/for@/