#!/usr/bin/perl
use lib "/home/cg204017";
use strict;
use warnings;
use diagnostics;
use DBI;
use CGI qw/:standard/;
require 'test.pl';