#!/usr/bin/perl
# prov.pl
use strict;
use warnings;
use vars qw( $SousMaintenance );

require './inc.pl';

print $SousMaintenance,"\n";