First line of input file not accessible.

Peter West via beginners <[email protected]> Wed, 17 Jul 2024 17:41:22 +1000
Newsgroups gmane.comp.lang.perl.beginners
Message-ID <[email protected]>
$ uname -a
Darwin Rosie.local 23.5.0 Darwin Kernel Version 23.5.0: Wed May  1 =
20:16:51 PDT 2024; root:xnu-10063.121.3~5/RELEASE_ARM64_T8103 arm64

$ locale
LANG=3D"en_AU.UTF-8"
LC_COLLATE=3D"en_AU.UTF-8"
LC_CTYPE=3D"en_AU.UTF-8"
LC_MESSAGES=3D"en_AU.UTF-8"
LC_MONETARY=3D"en_AU.UTF-8"
LC_NUMERIC=3D"en_AU.UTF-8"
LC_TIME=3D"en_AU.UTF-8"
LC_ALL=3D"en_AU.UTF-8=E2=80=9D

$ perl --version

This is perl 5, version 34, subversion 3 (v5.34.3) built for =
darwin-thread-multi-2level

$ cat print_file
#!/usr/bin/perl -n
while (<>) {
    print "$. $_";
}
exit;

$ print_file /tmp/orgs2
2
3     DevHub  CCIDevHub             [email protected]    =
00DdM000003155ZUAQ Connected
4   DevHub  DevHub                [email protected]             =
00DW2000000afcXMAQ Connected
5     DevHub  DevHub2               [email protected]              =
00DdL000000IZqeUAG Connected
6     DevHub  LightningAppTest      [email protected]    =
00DdM000006N6TaUAK Connected
7     DevHub  PackageTestPlayground [email protected] =
00DdM000005tVl5UAE Connected
8     Scratch 201-3-4               [email protected]  =
00DFf000000TjmXMAS Active    2024-07-15
9   Scratch AppTest1-S1           [email protected]  =
00DHF000000RGNG2A4 Active    2024-07-18
10

$ wc -l /tmp/orgs2
      10 /tmp/orgs2

$ cat /tmp/orgs2
    Type    Alias                 Username                       Org ID  =
           Status    Expires

    DevHub  CCIDevHub             [email protected]    =
00DdM000003155ZUAQ Connected
  DevHub  DevHub                [email protected]             =
00DW2000000afcXMAQ Connected
    DevHub  DevHub2               [email protected]              =
00DdL000000IZqeUAG Connected
    DevHub  LightningAppTest      [email protected]    =
00DdM000006N6TaUAK Connected
    DevHub  PackageTestPlayground [email protected] =
00DdM000005tVl5UAE Connected
    Scratch 201-3-4               [email protected]  =
00DFf000000TjmXMAS Active    2024-07-15
  Scratch AppTest1-S1           [email protected]  =
00DHF000000RGNG2A4 Active    2024-07-18

$

What happened to line 1?

=E2=80=94
Peter West
[email protected]
`=E2=80=9CMary.=E2=80=9D She turned and said to him in Aramaic, =
=E2=80=9CRabboni!=E2=80=9D`


-- 
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
http://learn.perl.org/