SYNOPSIS
      perl -Midi -E'x(qw(c1 f o5); n(qw(qn Cs)); n("F"); n("Ds"); n(qw(hn Gs_d1)); w()'

      timidity idi.mid

      # Compare with:
      perl -MMIDI::Simple -E'new_score; noop qw(c1 f o5); n qw(qn Cs); n "F"; n "Ds"; n qw(hn Gs_d1); write_score shift()' idi.mid

DESCRIPTION
    Easy Command-line MIDI

FUNCTIONS
  b
    BPM

  c
    Channel

    Default: 0

  d
    Duration

    Default: <96>

  n
    Add note

  o
    Octave

    Default: 5

  p
    Patch

    Default: 0 (piano)

  r
    Add rest

  t
    Time signature

    Default: "none"

  v
    Volume

    Default: 64

  w
    Write score

  x
    No-op (with "MIDI::Simple::noop")