sub getField{ my $self = shift; my $usernamestring = $_[1]; my $type = $_[0]; $sth = $self->{db}->prepare($sql) || die "cannot prepare query, errmsg = $DBI::errstr"; }