http://undcemcs02.und.edu/~userid/513/1/
http://undcemcs02.und.edu/~userid/
create
commands), and whatever languages‡, and
![]() Requirements The gamestore includes the following features:
|
|
Check.pl
Help
button:
~/public_html/cgi-bin/demo/encrypt/Check.pl
|
---|
|
#!/usr/bin/perl use CGI; $query = new CGI; $act = $query->param('act'); $password = $query->param('password'); $interface = $query->url_param('interface'); if ( $act eq "Display source" ) { if ( $password eq "password" ) { print( "Content-type: text/plain\n\n" ); if ( $interface == 1 ) { system( "cat 1.cgi;echo '\n\n\n\n\n';cat 1.pl;echo '\n\n\n\n\n';cat 1.java" ); } elsif ( $interface == 2 ) { system( "cat 2.cgi;echo '\n\n\n\n\n';cat 2.pl;echo '\n\n\n\n\n';cat 2.java" ); } elsif ( $interface == 3 ) { system( "cat 3.cgi;echo '\n\n\n\n\n';cat 3.pl;echo '\n\n\n\n\n';cat 3.java" ); } elsif ( $interface == 4 ) { system( "cat 4.cgi;echo '\n\n\n\n\n';cat 4.pl;echo '\n\n\n\n\n';cat 4.java" ); } elsif ( $interface == 5 ) { system( "cat 5.cgi;echo '\n\n\n\n\n';cat 5.pl;echo '\n\n\n\n\n';cat 5.java" ); } elsif ( $interface == 6 ) { system( "cat 6.cgi;echo '\n\n\n\n\n';cat 6.pl;echo '\n\n\n\n\n';cat 6.java" ); } elsif ( $interface == 7 ) { system( "cat 7.cgi;echo '\n\n\n\n\n';cat 7.pl;echo '\n\n\n\n\n';cat 7.java" ); } else { print( "\n\n\n No such interface: $interface" ); } } else { print( "Content-type: text/html\n\n" ); print( "<center><font size='+2'><b>Wrong password: </b>" ); print( "<i>$password</i></font>" ); print( "<form><input type='button' value='Back' onclick='history.go(-1);return false;' /></center>" ); } } elsif ( $act eq "Help" ) { print ( "Content-type: text/html\n\n" ); system( "cat Help.html" ); } else { print( "Content-type: text/html\n\n" ); print( "<center><font size='+2'><b>No such option: </b>" ); print( "<i>$act</i></font></center>" ); } |
create table
” have to be submitted, where SQL is Structured Query Language and DDL is Data Definition Language.
create
commands of database implementation is NOT submitted.