Read and convert a CSV file - first version

read-csv-by-massa.raku

sub read-csv(IO() $file) {
  gather {
    my $f = $file.open: :r :!chomp;
    with Text::CSV.new {
      .header: $f, munge-column-names => { S:g /\W+//.samemark('x').lc };
      while my $row = .getline-hr: $f { take $row }
    }
  }
}

sub csv-to-yaml(@line --> Str) 
  # secret sauce
  my %obj = do { ... };
  to-yaml %obj
}

sub server-put($_) {
  # HTTP::UserAgent
}

sub MAIN(Str $input) {
  my @r = lazy read-csv $input;
  server-login;
  server-put csv-to-json $_ for @r
}