my @data = qw( 0 1 5 6 7 8 9 12 13 );