<commit_before># sketchify command for converting CFEngine policy bundles into sketches
# <NAME>, July 1st, 2013
# <EMAIL>

use Data::Dumper;
use File::Copy;

######################################################################

%COMMANDS =
  (
   'sketchify' =>
   [[
     'sketchify FILE.cf',
     'Interactively generate a sketch from FILE.cf. All the necessary information is prompted from the user.',
     '(\S+)(?:\s+(\S+)(?:\s+(\S+)(?:\s+(\S+))?)?)?'
    ]]
  );

######################################################################

sub prompt_sketch_datum
{
    my $prompt = shift;
    my $default = shift;
    my $validate = shift;
    my $errmsg = shift;

    my $value;<commit_msg>Reworded help message for sketchify command<commit_after># sketchify command for converting CFEngine policy bundles into sketches
# <NAME>, July 1st, 2013
# <EMAIL>

use Data::Dumper;
use File::Copy;

######################################################################

%COMMANDS =
  (
   'sketchify' =>
   [[
     'sketchify FILE.cf',
     'Interactively generate a sketch from FILE.cf. You will be prompted for all the necessary information.',
     '(\S+)(?:\s+(\S+)(?:\s+(\S+)(?:\s+(\S+))?)?)?'
    ]]
  );

######################################################################

sub prompt_sketch_datum
{
    my $prompt = shift;
    my $default = shift;
    my $validate = shift;
    my $errmsg = shift;

    my $value;
{'fraction_non_alphanumeric': 0.3302881236823612, 'fraction_numerical': 0.007027406886858749, 'mean_word_length': 4.159420289855072, 'pattern_counts': {'":': 0, '<': 7, '<?xml version=': 0, '>': 9, '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': '1560122', 'n_tokens_mistral': 464, 'n_tokens_neox': 411, 'n_words': 114}