#!/bin/sh
set -e
sox ../ha.wav ha.raw
perl -0777 -ne 'print join ", ",  map {ord} split//' ha.raw | fmt > ha.numbers