% my $db = DBI->connect("DBI:SQLite:$db_file"); % if (exists $ARGS{name}) { $db->do("insert into subjects (name) values ('$ARGS{name}');"); % print $ARGS{name}; } % my $sql = $db->prepare("select * from subjects"); % $sql->execute;