if ( $file = param("choice") ) { open(FILE, "../data/texts/$file") or die $!; @data = ; close(FILE); $data = join("", @data); } elsif ( $ENV{HTTP_COOKIE} ) { @cookieArray = split( ';', $ENV{'HTTP_COOKIE'} ); foreach ( @cookieArray ) { ($cookieName, $cookieValue) = split ( '=', $_ ); $cookie{$cookieName} = $cookieValue; } $data = "Καλώς ήρθες " .$host. "! Χαίρομαι ειλικρινά που σε ξαναβλέπω!\n" . "Τελευταία φορα ήρθες εδώ ως " .$cookie{host}. "!\n" . "Αυτή είναι η " .$cookie{xronos}. " φορά που επισκέφτεσαι την σελίδα μου και χαίρομαι πολύ που την βρίσκεις ενδιαφέρουσα!\n" . "Ποιό κείμενο θα ήθελες να μελετήσεις αυτήν τη φορά ?!?"; } elsif ( !$ENV{HTTP_COOKIE} ) { $data = "Καλώς ήρθες " .$host. "! Ανοίγοντας το παραπάνω drop-down menu επέλεξε το κείμενο που θα ήθελες να διαβάσεις..."; }