#!/usr/bin/perl

my $n = 9565;

for my $i (1 .. $n){
    system (qq[wget https://www.rfc-editor.org/rfc/rfc$i.pdf]);
}
