1nn3

#!/usr/bin/env perl
# Siehe auch: https://www.perl-community.de/bat/poard/thread/20656

use diagnostics;
use strict;
use utf8;
use warnings;
use threads;

# Threard Start Handler

1nn3

#!/usr/bin/env perl
use Data::Dumper;
use POSIX;

#** @method public listsplit ()
# @brief split a list into equal length portions
#
# Teilt eine Liste in N gleiche Portionen auf.
# Beachte: Bleibt ein Rest, sind es N+1 Portionen. Ist $portions >
# scalar(@array), sind es nur scalar(@array) Portionen.

1nn3

#!/usr/bin/env sh
# ARP alert action
# grep "action on detect" /etc/arpalert/arpalert.conf 
# action on detect = "/usr/local/sbin/arpalert-action-on-detect"

mac="$1"
ip="$2"
extras="$3"
device="$4"
type_of_alert="$5"