Select Code to Download

#!/usr/bin/perl

...
  gallery => 1,
});
$image->commit;

CREATE TABLE gallery_images (
  id SERIAL NOT NULL PRIMARY KEY,
...
  filename TEXT NOT NULL,
  gallery INT
);