Select Code to Download

#! perl -slw
use strict;
...
    print join '', @odo = incOdo( @odo );
}

1
2
...

1
2
...
Use of uninitialized value within @odo in numeric lt (<) at C:\test\ju
+nk31.pl line 9.