I need to download the files (Unknown file names)

#!/usr/bin/perl
use strict;
use warnings;

my $url = 'https://tex.example.com/'; #this is example site I couldn't said here the original site

for(0..30)
{
    my $fldr = $_;
    my $newurl = $url."$fldr/([A-z0-9-.]*)";
    print "N: $newurln";

    my $content = `"curl -g $newurl"`;

    if(length $content)
    {
        print "Url: $urln";
        print "Content: $contentn";
    }
}

#for e.g.
#https://tex.example.com/1/files.tex
#https://tex.example.com/2/files.htm
#https://tex.example.com/3/files.sty

The above script doesn’t work. If could someone help me on this one.

Thanks in Advance