This is my first time writing perl and I want to take a CSV file which looks similar to this:

mask No. ,  block,  size,  base addr (hex), end addr (hex)--about 20 h
+eader names
fpg23, b002, 16384, 60000,  63FFF
fpg23, b002, 16384, 800000, 803FFF
fpg23, b003, 0, F00000, F00000
fpg23, b003, 4, F00000, F00004
fpg23, b003, 8, F00000, F00008
--so on for a variable amount of lines
[download]

so each line is represented as its own block, but I want to be able after reading the file, to sort the file by base address and be able to access other information in its line such as the end addr. my coworker said to use hashes, so I'm thinking of a multidimensional hash. I'm thinking that the column names are the keys of the hash, so can I sort a specific key (aka Base addr. (hex) key? this is my current code, from what I understand it is making the column name keys and it is reading line by line, but those values, are they private to that while loop? I believe I have to incorporate them in my hash table that I'm calling %reghash, just unclear of how to do that. I'd appreciate any help/feedback. Thank you!

#!/usr/bin/env perl
use strict;
use warnings;
use diagnostics;
use Text::CSV_XS;

my $filename = 'test1.csv';
my %reghash;
open(my $fh, '<', $filename) or die "Can't open $filename: $!";

my $csv = Text::CSV_XS->new ({
    binary        => 1, #allow special character. always set this
    auto_diag    => 1, #report irregularities immediately
    });


$csv->column_names ($csv->getline ($fh)); #use header


while (my $row = $csv->getline_hr ($fh)){
    
    printf "Base Address: %s\n", $row->{"Base Addr. (Hex)"};
}
close $fh;
[download]