#!/usr/bin/perl
use strict; use warnings;

use Data::Dumper;
use lib '/home/rohan/work/sec_scheduler/modules';
use sec_scheduler;

my $p = DBI::Page->retrieve(page_id => 1);
print Dumper($p->cols);