## #!/usr/bin/perl use DBI; use CGI; print "Content-type:text/html\r\n\r\n"; print "Updation\\Display"; print ""; $query = new CGI; print "Content-type: text/html\n\n"; print < Hello, world! Hello, world!