package main;

use TArtLib;
use TArt::Editor;

my $lib = new TArtLib;

# This object would populate itself from the database,
# using the number passed to it as the primary key,
# and hopefully using TArtLib's DBI connection.
my $ed  = new TArt::Editor(1);

print $ed->{NAME}; # etc. etc.