@_ = split /(?:.+\n){$skip}/m, "@_", 2;  # add limit
# closer, but now I have @_ == 2, 
# since there is a leading null

shift @_;
# now I have a single element array with 
# the file remainder in $_[0]

@_ = split /\n/, $_[0];
# now I have the desired results.