perl -sple"BEGIN{open BIG};($1,$2)=split;seek(BIG,$1,$2);read(BIG,$_,0)" -- -BIG=bigfile.dat index.dat >outfile.dat