<commit_before># SlimRat 
# <NAME> <<EMAIL>> 2009 
# public domain

package Toolbox;

use Exporter;
@ISA=qw(Exporter);
@EXPORT=qw(dwait ptime $useragent);

use strict;
use warnings;

our $useragent = "Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.4) Gecko/20030624";

sub dwait{
	my ($wait, $rem, $sec, $min);
	$wait = $rem = shift or return;
	$|++; # unbuffered output;
	($sec,$min) = localtime($wait);
	printf(&ptime."Waiting %02d:%02d\n",$min,$sec);
	while ($rem){
		($sec,$min) = localtime($rem);
		printf "\r%02d:%02d remaining ",$min,$sec;
		sleep 1;
		$rem--;
	}
	print "\r".&ptime."Continuing\n";
}

sub ptime {
	my ($sec,$min,$hour) = localtime;
	sprintf "[%02d:%02d:%02d] ",$hour,$min,$sec;
}


1;
<commit_msg>Removed countdown, as it interferred with signal handling.<commit_after># SlimRat 
# <NAME> <<EMAIL> g<EMAIL>> 2009 
# public domain

package Toolbox;

use Exporter;
@ISA=qw(Exporter);
@EXPORT=qw(dwait ptime $useragent);

use strict;
use warnings;

our $useragent = "Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.4) Gecko/20030624";

sub dwait{
	my ($wait, $rem, $sec, $min);
	$wait = $rem = shift or return;
	$|++; # unbuffered output;
	($sec,$min) = localtime($wait);
	printf(&ptime."Waiting %02d:%02d\n",$min,$sec);
	sleep ($rem);
}

sub ptime {
	my ($sec,$min,$hour) = localtime;
	sprintf "[%02d:%02d:%02d] ",$hour,$min,$sec;
}


1;

{'fraction_non_alphanumeric': 0.21476014760147602, 'fraction_numerical': 0.05092250922509225, 'mean_word_length': 4.895652173913043, 'pattern_counts': {'":': 0, '<': 10, '<?xml version=': 0, '>': 10, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '40508', 'n_tokens_mistral': 633, 'n_tokens_neox': 581, 'n_words': 135}