gistfile1.txt

## consumer.pm  : tsvs_to_mysql
	my $columns = join(",",@$SocialFlow::140Kit::Schema::Result::Click::imported_cols);
	my $query = "LOAD DATA INFILE '$click_stream_tsv' 
	    IGNORE INTO TABLE `clicks` 
	    CHARACTER SET 'utf8' 
	    ($columns)";

## click.pm

sub cols {
    [ 
        ["a"],
        ["c"],
        ["nk"],
        ["tz"],
        ["gr"],
        ["g"],
        ["i"],
        ["h"],
        ["k"],
        ["l"],
        ["al"],
        ["hh"],
        ["r"],
        ["u"],
        ["t"],
        ["hc"],
        ["cy"],
        ["ll"],
    ];
}

our $imported_cols = cols;