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

my $index = rtlsdr_get_index_by_serial( $serial_number ); # it returns 0, this is not an error value so I think is good

my $name = rtlsdr_get_device_name( $index );
print "device name '$name'\n";

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