Perl 1.0
Program
for ($i = 1; $i <= 5; $i++) { print "$i\n"; }
Run