Is it okay to just do my $str = chomp(<STDIN>);?

No, because chomp is a bit special: it modifies its argument(s) and returns the total number of characters removed from all its arguments. The code you showed would fail because chomp wants to modify its arguments, but can't modify <STDIN> itself.

The reason chomp( my $str = <STDIN> ); works is because a scalar assignment in Perl like ( my $str = <STDIN> ) is modifiable (an "lvalue"), as described in Assignment Operators: "Modifying an assignment is equivalent to doing the assignment and then modifying the variable that was assigned to."

If you want to be a little bit more verbose, what you can do is:

my $str = <STDIN>;
chomp($str);
[download]

Extra parens arent idiomatic :p  chomp $foo;

Try it! What does it return?

If it's not what you want, another approach might be to call the chomp on the result of the assignment:

chomp( my $str = <STDIN> );
[download]

Hope this helps!

Depends on what you want to have in $str. Read chomp to learn about the return value of chomp.

perl -we 'chomp <>'
[download]

> Can't modify <HANDLE> in chomp at -e line 1, at EOF

($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,
[download]