Volevo provarlo a fare anche io, per adesso ho fatto i primi 2 e vanno che e un piacere...

Adesso provo a farlo anche io...

Questo e per esperti
codice:
#!/usr/bin/perl

print q{__________________________________________________________________________
|ZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZ|

Calcolatore di numeri per Hacker Journal.
Inserire i valori e il programma vi calcolera i numeri dal giornale di
partenza e quello di arrivo.

By ..::Olimp-Force ::..(Yaro)
__________________________________________________________________________
|ZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZ|
};

print "*Indicare da che numero di Hacker Journal si desidera partire: \n\n";
print "    Numero: "; 
$n[0] = <STDIN> - 1;
print "\n";

print "*Indicare fino a che numero di Hacker Journal si desidera arrivare: \n\n";
print "    Numero: ";
$n[1] = <STDIN>;
print "\n";

$n[2] = $n[1] - $n[0];

while ($n[0] < $n[1]) { 
		$n[0]++;
		print "HJ$n[0] \n";
};

if ($n[0] > $n[1]) {
			print "\n";
			print "ERRORE: il numero di Hacker Journal a cui si desidera \n"; 	
			print "arrivare e piu piccolo di quello di partenza. \n\n";

			system ("pause");
}

else {
			print "\n";
			print "I numeri di Hacker Journal sono stati calcolati \n\n";
			print "Abbiamo calcolato $n[2] numeri di Hacker Journal\n\n";
			print "\nby ..:: Olimp-Force ::.. \n\n\n";
			
			system ("pause");
}


#Copyright by ..:: Olimp-Force ::..(Yaro)