In Perl 5, how to queue a process/application after it reaches a maximum limit
问题 I have a program that is being symlinked to multiple directories e.g. /main/foo.pl /run1/foo.pl -> /main/foo.pl /run2/foo.pl -> /main/foo.pl /run3/foo.pl -> /main/foo.pl /run4/foo.pl -> /main/foo.pl They're being run as cron jobs, hence I have the following entries in the crontab: */2 * * * * /run1/foo.pl */2 * * * * /run2/foo.pl */2 * * * * /run3/foo.pl */2 * * * * /run4/foo.pl A snippet of foo.pl is as below: use Fcntl qw(:flock); use autodie qw(:all); open my $self, '>', "$FindBin::Bin