'`tail -100`' => sub {
    my @lines = split( /\n/, `tail -100 $f` );
},