in reply to next unless not working

Yet another thing: $_ in your loop will contain the line separator and will therefore never be equal to "Java".

You may chomp the input or perform a regex match /^Java$/ instead of $_ eq "Java"

Greetings,
🐻

$gryYup$d0ylprbpriprrYpkJl2xyl~rzg??P~5lp2hyl0p$

Replies are listed 'Best First'.
Re^2: next unless not working
by choroba (Cardinal) on Feb 05, 2025 at 17:27 UTC
    > never be equal

    Well, the last line could, if it didn't end in a newline. But that's definitely not what was expected.

    map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]
[reply]
[d/l]

In Section Seekers of Perl Wisdom