my $mech = ....;

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


}