Help for this page
#!/usr/bin/perl -slw ... sleep 1; print $count{$batch_dates}; }
#!/usr/bin/perl -slw ... sleep 1; print $count{$num}; }