Select Code to Download

const char *
rtlsdr_get_device_name(index)
  uint32_t index

int 
rtlsdr_open(dev, index)
  SDR::RTLSDR **dev
  uint32_t index

#include <stdio.h>
#include <malloc.h>
...
        (*dev)->a = 42;
        return 1;
}

my $serial_number = "00000001"; # from dmesg output

...
my $device = undef; # = SDL::...->new() ??? # i don't think so/how?
my $status = rtlsdr_open( \$device , $index)
print "status $status for index $index\n";