#!/usr/bin/perl
print "Veuillez saisir la temperature exterieure.\n 
Ainsi, l'hotesse vous dira si le vol sera agreable!!\n";
$temp=<STDIN>;
if ($temp>30) {
	print "Trop chaud!";
	}
if ($temp<20) {
	print "Trop froid!";
	}
if ($temp<30 && $temp>20) {
	print "Impeccable!";
	}
if ($temp==30) {
	print "Va te baigner!";
	}
if ($temp==20) {
	print "Colle toi au chauffage";
	}