Clearview Cinemas: Job Opportunities

#!/usr/bin/perl require "cgi-lib.cgi"; &ReadParse; #print "Content-type: text/html\n\n"; print" "; print"
"; print"\n"; print"
"; ############################################################################################################################ sub connect_database { # Connect to the requested server use DBI; my $dbh= DBI->connect("DBI:mysql:clearview:localhost",'clearview','clearm0v1es'); if (not $dbh) { error(); } return $dbh; } ########################################## sub error { print "Content-type: text/html\n\n"; print "\n"; print ""; print "error occured connecting to MySQL server\n"; print ""; exit; }
#!/usr/bin/perl require "cgi-lib.cgi"; &ReadParse; # following line sometimes shows up in html on some page but if removed throws an error on other ones. #print "Content-type: text/html\n\n"; #get a date from a server #------------------------------------------------------------- my $dbh=connect_database(); my $sth = $dbh->prepare('Select Current_Date;' ) or die "Couldn't prepare statement: " . $dbh->errstr; $sth->execute(); while(@data = $sth->fetchrow_array()) { $date=@data[0]; } #------------------------------------------------------------- ©_file; foreach $main_line (@main) { @wrd_seprtor = split(/\^/,$main_line); if($wrd_seprtor[31] le "$date") { $id[$idCount++] =$wrd_seprtor[0]; $title[$titleCount++] =$wrd_seprtor[1]; } if($wrd_seprtor[30] eq "Y") { $id_picture[$id_pictureCount++] =$wrd_seprtor[0]; $top_4[$top_4Count++] =$wrd_seprtor[30]; $picture[$pictureCount++] =$wrd_seprtor[3]; } } ######################################## START SORT ###################################### $array=(" "); $real_array=("z","z"); $num_of_items=0; for ($i=0; $i<$idCount; $i++) { $array[$i]=$title[$i]; } $num_of_items=@array; for($i=0; $i<=$num_of_items; $i++) { $real_array[$i]="zz"; } for($count=0;$count<$num_of_items;$count++) { for($i=0;$i<$num_of_items;$i++) { if($real_array[$count] gt $array[$i]) { $real_array[$count]=$array[$i]; $New_id[$count]=$id[$i]; $temp=$i; } } $array[$temp]="zz"; } ########################################### END SORT #################################### print" "; print"
"; print"
\n"; ############################################################################################################################ sub connect_database { # Connect to the requested server use DBI; my $dbh= DBI->connect("DBI:mysql:clearview:localhost",'clearview','clearm0v1es'); if (not $dbh) { error(); } return $dbh; } ########################################## sub error { print "Content-type: text/html\n\n"; print "\n"; print ""; print "error occured connecting to MySQL server\n"; print ""; exit; } sub copy_file{ open(MAIN,"clearview_movie.dat") || die "clearview_movie.dat - Can't open jobs file for reading $!\n"; @main =
; close(MAIN); }

Employment Application For Clearview Theatres

Contact Details:

First Name:

Last Name:

Email address:

Phone:

Street address:

City	State	Zip


Availability
	From	To
Mon
Tue
Wed
Thu
Fri
Sat
Sun

Experience:

Are you at least 17 (18 in New York City) years old?
yes no
Have you ever had prior customer service experience or experience working with the public?
yes no

Have you had experience handling cash?
yes no

Our employees are trained in all areas of floor staff (box office, ticket taking, ushering, concessions). are you interested in working in all of these stations?
yes no

Please select the state in which you are interested in working:

Please paste resume text:

Comments: