##
$resultset = $schema->resultset('Ical')
->search({ uid => $id });
##
##
my $schema = Timetable::Schema->connect("dbi:Oracle:$schema_name",
$db_username, $db_password,
{on_connect_call => 'datetime_setup'}
);