http://qs321.pair.com?node_id=11124254


in reply to Re: [OT]: Re^9: What's the right way to write a method which returns one line at a time from a file?
in thread What's the right way to write a method which returns one line at a time from a file?

# When their name is... Address them as... my $salute = $name eq $EMPTY_STR ? 'Customer' : $name =~ m/(.*), \s+ Ph[.]?D \z /xms ? "Dr $1" : ? $name ;

One ? too many:

Win8 Strawberry 5.8.9.5 (32) Thu 11/26/2020 5:03:36 C:\@Work\Perl\monks >perl -Mstrict -Mwarnings -l my $name = 'xyzzy'; my $salute = $name eq 'foo' ? 'Fooble' : $name eq 'bar' ? 'Barfly' : $name ; print $salute; ^Z xyzzy


Give a man a fish:  <%-{-{-{-<

  • Comment on Re^2: [OT]: Re^9: What's the right way to write a method which returns one line at a time from a file?
  • Select or Download Code

Replies are listed 'Best First'.
Re^3: [OT]: Re^9: What's the right way to write a method which returns one line at a time from a file?
by eyepopslikeamosquito (Archbishop) on Nov 26, 2020 at 10:20 UTC

    Yes, I've corrected the offending node. Thanks.