in reply to call sub_function easily

Not sure what you are looking for. May be it is something like my $testomato = sub {shift};. You call it as say $testomato->(q(test));. Regards, Karl.

«The Crux of the Biscuit is the Apostrophe»

perl -MCrypt::CBC -E 'say Crypt::CBC->new(-key=>'kgb',-cipher=>"Blowfish")->decrypts_hex($ENV{KARL});'Help