Select Code to Download

package Subsequence;
use overload '""' => \&list_form;
...
    . ")";
}
1;

use Subsequence;
my @test_nums = (0, 10, 11, 12, 2, 4, 3, 5, 6, 7, 9);
...
print $x, "\n";
$x->insert_list(1, 13);
print $x, "\n";