Select Code to Download

#! perl -slw
use strict;
...
sometype not null, somevar4 sometype(20), somevar5 sometype(20) null,
somevar6 sometype(10))

C:\test>junk3
create table foo (
...
sometype not null, somevar4 sometype(20) not null,  somevar5 sometype(
+20) null,
somevar6 sometype(10) not null )