Good point. Playing around with qwen2.5-coder it came up with the below version incorporating both this suggestion and some of mine.
use warnings; use strict; my $file_path = "/Users/anaordonez/Documents/my_languages.txt"; open(my $fh, '<', $file_path) or die "Sorry!! couldn't open '$file_pa +th': $!"; print "Reading file \n"; while (my $line = <$fh>) { chomp $line; print "$line\n" if $line eq "Java"; } close($fh);
The cake is a lie.
The cake is a lie.
The cake is a lie.
In reply to Re^2: next unless not working
by Fletch
in thread next unless not working
by anitaord
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |