# New Ticket Created by  Tom Browder 
# Please include the string:  [perl #131543]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/Ticket/Display.html?id=131543 >


Add a line number method to IO::Handle so that it can be used on demand:

my $fh = open "some-text", :linenumber, :index1;

for $fh.lines -> $line {
    say "$fh.ln";   # output: 1
    last;
}

Reply via email to