• # un p'tit sub

    Posté par (site web personnel) . En réponse au message source shell. Évalué à -1.

    si tu as deja tes variables mais qu'il ne te manque que les export, tu peux peut-etre ecrire une petite fonction du style :

    sub get_export{
    my $file=shift;
    open(FILE,$file) or die "ouverture de $file : $!\n";
    while(<FILE>){
    if($_=~m/^export (.*)=(.*)$/){
    $ENV{1ドル}=2ドル;
    }
    }
    close(FILE);
    }

    # appel de la fonction :
    get_export ("/etc/mon_appli/appli.conf");


    code non teste mais l'idee est la ...