Praticamente vorrei fare qualcosa del genere ma non funziona...mi aiutate a farla funzionare perfavore?

sub stampa {
my $view = shift;

if ($view eq 'ONAIR') {
$file = /ONAIR/index2.html;
$OUT = 'FILE_OUT';
}
elsif ($view eq 'STANDBY) {
$file = /STANDBY/index2.html;
$OUT = 'FILE_OUT';
}
elsif
$OUT = 'STDOUT';

# Apro il file per scrivere
open (FILE_OUT, ">$file");

# Se il tipo di visualizzazione NON è onair o standby
# Stampo a video
print $OUT $pagina;

# chiudo il file aperto
close(FILE_OUT);
}

grazie in anticipo...