Select Code to Download

#!/usr/bin/perl
# prov.pl
...
require './inc.pl';

print $SousMaintenance,"\n";

$SousMaintenance = 'value one';
1;

# inc.pl
package myInc;
$SousMaintenance = 'value one';

print $myInc::SousMaintenance,"\n";