width:180px;
}
+/*
@keyframes pointerani {
0% {width:25px;height:25px;margin:0;}
100% {width:20px;height:20px;margin:2.5px 0 0 2.5px;}
}
+*/
+
+@keyframes pointerani {
+ 0% {opacity:.2;}
+ 100% {opacity:.7;}
+}
+
#pointer {
width:20px;
height:20px;
background:transparent;
- border:5px solid red;
+ border:7px solid red;
opacity:0.7;
border-radius:15px;
position:absolute;
- animation: pointerani 1s infinite alternate;
+ //animation: pointerani 1s infinite alternate;
}
my $room = $cgi->param('room');
if (!($room =~ /^[a-zA-Z0-9]+$/) || !(-d "store/$room")) {
- print "Invalid room";
+ print "Invalid room $room";
return 1;
}
}
close(OUTFILE);
-if($basename =~ /\.pdf$/) {
+if($basename =~ /\.pdf$/i) {
my $b = $basename;
- $b =~ s/.pdf//;
+ $b =~ s/.pdf//i;
system("cd store/$room;../../convert.sh \"$basename\" \"$b\"");
system("rm \"store/$room/$basename\"");
}
-
sub GetBasename {
my $fullname = shift;
return(pop(@parts));
}
+
+
+
+print <<REDOC;
+<!DOCTYPE html>
+<html>
+<head>
+ <meta http-equiv="refresh" content="0; url=showroom.pl?$room">
+</head>
+<body>
+</body>
+</html>
+REDOC