%mail = ( To      => 'nik0s@mycosmos.gr',
          From    => 'roufianos@kyp.gr',
          Subject => "Επισκέπτης από $host"
        );
sendmail(%mail) or die $Mail::Sendmail::error;