Skip to content

Instantly share code, notes, and snippets.

@1nn3
1nn3 / listsplit.pl
Last active Jul 19, 2020
Teile eine Liste in gleichlange Teile
View listsplit.pl
#!/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
1nn3 / loop-threads.pl
Last active Apr 23, 2020
Threads durchlaufen
View loop-threads.pl
#!/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
You can’t perform that action at this time.