in reply to print and say
1) What do you mean by "store"? If you want to store it in a variable, assign the function call to the variable:
my $result = myfunct($str1, $str2);
To store it in a file, print to a file:
open my $OUT, '>', $filename or die $!; say {$OUT} myfunct($str1, $str2); close $OUT;
2) Documented in say:
Just like print, but implicitly appends a newline. say LIST is simply an abbreviation for { local $\ = "\n"; print LIST }.
($q=q:Sq=~/;[c](.)(.)/;chr(-||-|5+lengthSq)`"S|oS2"`map{chr |+ord }map{substrSq`S_+|`|}3E|-|`7**2-3:)=~y+S|`+$1,++print+eval$q,q,a,
|
---|
In Section
Seekers of Perl Wisdom