Ok. I tried to play with this a bit more. Geez, even installing Net::Google:Spreadsheets::V4 took some work! I ran into a failed Furl installation dependency and had to back up 5 versions to Furl-3.08. Then I tripped across the issue at Perl Google Sheets API Install Problems. I did manage to create a Google Client_id and Secret, but for the moment have given up because I have some other work in progress. Evidently I have to spend some more time learning about the Google App eco-system.

However, this example appears to be what you want:
I can't run this critter myself, you hopefully you can.

#!/usr/bin/env perl

use strict;
use warnings;
use 5.010_000;
use utf8;
binmode STDOUT, ":encoding(utf8)";

use FindBin;
use lib $FindBin::Bin . '/../lib';
use Net::Google::Spreadsheets::V4;
use URI::Escape;

my $gs = Net::Google::Spreadsheets::V4->new(
    client_id      => "YOUR_CLIENT_ID",
    client_secret  => "YOUR_CLIENT_SECRET",
    refresh_token  => "YOUR_REFRESH_TOKEN",

    spreadsheet_id => "YOUR_SPREADSHEET_ID",
);

my($content, $res);

my $title = 'My sheet';

my $sheet = $gs->get_sheet(title => $title);

# read data
($content, $res) = $gs->request(
    GET => sprintf("/values/%s", uri_escape($gs->a1_notation(
        sheet_title => $title,
    )))
);

for my $row (@{ $content->{values} }) {
    say join(', ', @$row);
}

exit;
[download]

PS: If I were messing with this, I'd run Data::Dumper on $sheet,$content and $res and see what those things looks like.