<commit_before>#!/usr/bin/env perl

use strict;
use warnings;

my $usage = "$0 sep mat > tr_mat\n";
my $sep = shift @ARGV or die $usage;<commit_msg>better usage<commit_after>#!/usr/bin/env perl

use strict;
use warnings;

my $usage = "cat [mat] | $0 sep [mat] > tr_mat\n";
my $sep = shift @ARGV or die $usage;
{'fraction_non_alphanumeric': 0.1650485436893204, 'fraction_numerical': 0.006472491909385114, 'mean_word_length': 4.254237288135593, 'pattern_counts': {'":': 0, '<': 3, '<?xml version=': 0, '>': 5, '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': '2434615', 'n_tokens_mistral': 127, 'n_tokens_neox': 122, 'n_words': 40}