Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

Re^3: Idiomatic Perl?

by haukex (Archbishop)
on Mar 20, 2018 at 14:46 UTC ( [id://1211338]=note: print w/replies, xml ) Need Help??


in reply to Re^2: Idiomatic Perl?
in thread Idiomatic Perl?

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);

Replies are listed 'Best First'.
Re^4: Idiomatic Perl?
by Anonymous Monk on Mar 20, 2018 at 19:10 UTC
    Extra parens arent idiomatic :p  chomp $foo;

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://1211338]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others scrutinizing the Monastery: (6)
As of 2024-04-23 20:29 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found