Help for this page

Select Code to Download


  1. or download this
    /tmp/demo>file *.txt
linux-file.txt:   ASCII text
...
        ];

/tmp/demo>
  2. or download this
    H:\tmp\demo>perl -MWin32::autoglob -MData::Dumper -E "$Data::Dumper::U
+seqq=1; for $fn (@ARGV) { open $f,'<',$fn or die; @lines=<$f>; chomp 
+@lines; say qq<$fn:>; say Dumper(\@lines); }" *.txt
linux-file.txt:
...


H:\tmp\demo>