Create seq_length.pl