Help for this page

Select Code to Download


  1. or download this
    my $LINUX;
BEGIN { $LINUX = ($^O eq 'linux') };
use if $LINUX, 'MIDI::ALSA' => ('SND_SEQ_EVENT_PORT_UNSUBSCRIBED', 'SN
+D_SEQ_EVENT_SYSEX');
  2. or download this
    use if ($^O eq 'linux'), 'MIDI::ALSA' => ('SND_SEQ_EVENT_PORT_UNSUBSCR
+IBED', 'SND_SEQ_EVENT_SYSEX');