my $sth = $dbh->do(
"INSERT INTO tblFilm (Name, Price) VALUES ('$FilmName', '$Price')") || print "Can't prepare statement: $DBI::errstr";