· 8 years ago · Apr 03, 2018, 06:44 AM
1
2#9a
3#!/usr/bin/perl
4use CGI':standard';
5
6print "Content-type:text/html \n\n";
7@greetings = ("hello","hi","bonjour","salut","kohnichiwa","namaste");
8($s,$m,$h) = localtime(time);
9$sum = $s+$m+$h;
10$num = ($sum % 5);
11$a = $greetings[$num];
12print $a," ",param("name")
13
14
15
16
17
18
19
20#10
21#!/usr/bin/perl -w
22use DBI;
23use CGI':standard';
24# output the content-type so the web server knows
25
26print "content-type: text/html\n\n";
27
28
29if (defined param("submit")){
30
31 $name = param("name");
32 $age = param("age");
33 print "Add ",$name,$age;
34 my $dbh = DBI->connect('DBI:mysql:6isb2', 'viis42', 'viis42');
35 my $sth = $dbh->prepare("insert into viis42_perl_table values(0,'$name',$age)");
36 $sth->execute;
37}
38
39
40my $dbh = DBI->connect('DBI:mysql:6isb2', 'viis42', 'viis42');
41my $sql = q/select * from viis42_perl_table/;
42my $sth = $dbh->prepare($sql);
43$sth->execute;
44
45print '<form action="p10.cgi" method="get"><input type="text" name="name" placeholder="Name">';
46print '<input type="number" name="age" placeholder="Age"><input type="submit" name="submit" value="submit"></form>';
47
48print '<table border="1">';
49print "<tr><th>$sth->{NAME}->[1]</th><th>$sth->{NAME}->[2]</th></tr>";
50while (my @row = $sth->fetchrow_array) {
51 print "<tr><td>$row[1]</td><td>$row[2]</td></tr>\n";
52}
53print "</table>\n";
54
55
56
57
58
59
60
61
62//11a
63<?php
64
65 if (isset($_GET["action"])){
66 $a = $_GET["action"];
67 if ($a=='set'){
68 setcookie($_GET["name"],$_GET["value"],time()+2000);
69 echo "Cookie set";
70 }
71 else{
72 echo $_COOKIE[$_GET["name"]];
73 }
74 }
75
76
77?>
78
79
80
81
82
83//11b
84
85<?php session_start();
86
87 if (!isset($_SESSION["count"])){
88 $_SESSION["count"]=1;
89 }
90 else{
91 $_SESSION["count"]=$_SESSION["count"]+1;
92 }
93 echo $_SESSION["count"];
94
95?>
96
97
98
99
100
101//12
102<?php
103
104 $sql = "create table if not exists viis42_books(Ano int primary key auto_increment,title text, author text, edition text, publisher text)";
105 $mysqli = mysqli_connect("localhost", "viis42", "viis42", "6isb2");
106 $res = mysqli_query($mysqli, $sql);
107
108
109 if (isset($_GET["q"])){
110 $s = $_GET["q"];
111 $sql = "select * from viis42_books where title like('%$s%')";
112 $mysqli = mysqli_connect("localhost", "viis42", "viis42", "6isb2");
113 $res = mysqli_query($mysqli, $sql);
114 }
115 else{
116
117 $mysqli = mysqli_connect("localhost", "viis42", "viis42", "6isb2");
118 $res = mysqli_query($mysqli, "SELECT * from viis42_books");
119 }
120
121 if (isset($_GET["add"])){
122 $title=$_GET["title"];
123 $author=$_GET["author"];
124 $edition=$_GET["edition"];
125 $publisher=$_GET["publisher"];
126
127 $mysqli = mysqli_connect("localhost", "viis42", "viis42", "6isb2");
128 $res2 = mysqli_query($mysqli, "insert into viis42_books values(0,'$title','$author','$edition','$publisher')");
129 echo $res2;
130 }
131
132 while($row = mysqli_fetch_assoc($res)){
133 echo $row['Ano']." ".$row["title"]." ".$row["author"]." ".$row["edition"]." ".$row["publisher"]."<br>";
134 }
135
136?>
137
138
139<br><br>
140
141<form action="p12.php" method="get">
142 <input type="text" name="q" placeholder="Search Title">
143 <input type="submit" name="search" value="Add Book">
144</form>
145
146<br><br>
147
148<form action="p12.php" method="get">
149 <input type="text" name="title" placeholder="Title">
150 <input type="text" name="author" placeholder="Author">
151 <input type="text" name="edition" placeholder="Edition">
152 <input type="text" name="publisher" placeholder="Publisher">
153 <input type="submit" name="add" value="Add Book">
154</form>