server# perl perl.pl
Can't call method "column" on an undefined value at perl.pl line 5.