Select Code to Download

create table mytable(
    field1 integer,
...
    field4 varchar(24),
    field5 varchar(24)
);

use strict; use warnings;
use Data::GUID;
...
}

__END__

$ perl mce-pg.pl
wid 4; chnk 3; ins 40; cnt 0
...
wid 2; chnk 97; ins 49; cnt 100
wid 4; chnk 99; ins 49; cnt 100
wid 1; chnk 100; ins 49; cnt 100

wid 2; chnk 4; ins 41; cnt 1
wid 4; chnk 3; ins 42; cnt 1