Bonjour à tous,

Je m'exerce au PERL à travers la création d'un petit script pour mon serveur Nagios.
J'ai l'erreur suivante :

    Can't find string terminator "EOF" anywhere before EOF at check_disque.pl line 15.

Mon script est le suivant :

    #!/usr/bin/perl
    #=====================================================================
    # Auteur : Admin
    # Date   : 13/03/2022
    # But    : plugin Nagios pour vérifier l'espace disque utilisé
    #=====================================================================
    # Module à utiliser
    use strict;
    use warnings;
    use Nagios::Plugin;
    use feature qw(switch say);
    use

Bonjour à tous,
Mon Ubuntu est long a démarrer, et ce depuis que je l'ai installé.
Rapport dmesg:

[    0.276979] TCP: Hash tables configured (established 65536 bind 65536)
[    0.277009] UDP hash table entries: 4096 (order: 5, 131072 bytes, linear)
[    0.277031] UDP-Lite hash table entries: 4096 (order: 5, 131072 bytes, linear)
[    0.277070] NET: Registered protocol family 1
[    0.277075] NET: Registered protocol family 44
[    0.277085] pci 0000:00:02.0: Video device with shadowed ROM at [mem 0x000c0000-0x000dffff]
[    0.277352]