$| = 1;

foreach(0..9999){
    my $nr = do "LfdNr.bin" or die $@;
    print "$nr\n";
    # sleep 1;
}