#!/usr/bin/perl -w

use strict 'vars';

my $variable = "test\n";
print ($varable);
print "erreur\n";
