C:\Dokumente und Einstellungen\corion>perl -MData::Dumper -e "{$_=[];local $/=qq(\n); @$_=<>};warn Dumper $_; my $count=@$_; print $count, ' lines';" \boot.ini
$VAR1 = [
          '[boot loader]
', ...
        ];
5 lines

##</code><code>##

> perl -e "{$/=undef, $_=<>} my $count=()=split /\n/,$_,-1; print $count" \boot.ini
6