alecramsay

(fn [& exp]
  (reduce (fn [result instr]
            (apply (first instr) (list result (second instr))))
          (first exp)
          (partition 2 (rest exp))
          )
  )

alecramsay

Keybase proof

I hereby claim:

• I am alecramsay on github.
• I am alecramsay (https://keybase.io/alecramsay) on keybase.
• I have a public key whose fingerprint is 0075 5C76 4477 D73D 6534 783F F7EE CE00 8EBA E978

To claim this, I am signing this object:

alecramsay

Verifying that +alecramsay is my blockchain ID. https://onename.com/alecramsay

alecramsay

#!/usr/bin/env perl

# This Perl script eats CR and LF characters embedded within quoted strings in a .csv file.
# It assumes the file uses comma-separated values quoting rules:
# https://en.wikipedia.org/wiki/Comma-separated_values#Basic_rules
# and should work with any file, .csv or not, that follows them.

# TODO: Doesn't support double double-quotes embedded within the double-quoted strings.

# Args  <input file>