Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl
use strict;
...
$i=0; bar(); print("Press Enter to continue"); <STDIN>;  # 32,872K
$i=0; bar(); print("Press Enter to continue"); <STDIN>;  # 32,860K
$i=0; bar(); print("Press Enter to continue"); <STDIN>;  # 32,856K