use DBD::SQLite;
use Data::Dumper;

use strict;
use warnings;

my $dbh = DBI->connect("dbi:SQLite:uri=file:osopenusrn_202203.gpkg?mode=rwc");

my $tab = $dbh->prepare("SELECT * FROM openUSRN");
$tab->execute;
while (my $n = $tab->fetchrow_hashref) {
    print Dumper $n;
}

##</code><code>##

$VAR1 = {
          'geometry' => 'GP &#9827;4l  &#9658;Îú&#9617;ü~&#9644;A ]m&#9827;&#8595;&#8962;&#9644;A&#9492;¯&#9556;&#9500;&#9788;$&#8594;A&#9492;&#9562;v&#9632;[$&#8594;A                &#9786;Ý&#9829;  &#9787;   &#9786;Û&#9829;  &#9787;    ]m&#9827;&#8595;&#8962;&#9644;A&#9492;&#9562;v&#9632;[$&#8594;A        &#9617;¡Ï&#9600;¤~&#9644;A&#9492;¯&#9556;&#9500;&#9788;$&#8594;A        &#9786;Û&#9829;  &#9787;   &#9658;Îú&#9617;ü~&#9644;A`©&#9650;E+$&#8594;A        &#9617;¡Ï&#9600;¤~&#9644;A&#9492;¯&#9556;&#9500;&#9788;$&#8594;A        ',
          'usrn' => 2900534,
          'id' => 1497,
          'street_type' => 'Designated Street Name'
        };