my $mech = ....;

for my $page_number (1 .. 1_000_000) {
    
    my $uri = "siteone_dot_com?show_subsite=$page_number";
    my $response = $mech->get($uri);


} 

##</code><code>##


my $mech = ....;

my $url = "siteone_dot_com";
my $param = 'show_subsite';

for my $value (1 .. 1_000_000) {
    
    my $response = $mech->get($url, $param => $value);


}