#!/usr/bin/env perl

use strict;
use warnings;

use Data::Table;
use Cpanel::JSON::XS;

my $table = Data::Table::fromCSV('data.csv');

my @column_names = $table->header;

foreach my $col_name (@column_names) {
    my @column_values = $table->col($col_name);
    my $json = encode_json(\@column_values);
    print "var $col_name = $json;\n";
}

exit;