#!/usr/bin/perl
use warnings;
use strict;

if ( grep /^(?:--help|-help|-h)$/, @ARGV ) {
    print "Help arguments have been found\n";
}
else {
    print "No help arguments found\n";
}