Select Code to Download

package MyDB;
use DBIx::LazyMethod::MSSQL;
...
}

1;

use MyDB;
my $db = MyDB->new();
...
my $title;
$db->GetFieldTitle( fieldtype => 'I', fieldid => 11, fieldtitle => $ti
+tle);
print "\$title = $title\n";