#!/usr/bin/perl

for (my $i = 0; $i <= 100; $i += 5) {
   print($i, "\n");
}

print "\n";

for (0..20){
     print 5 * $_,"\n";
}