Help for this page

Select Code to Download

Select or download this
```
 
ONE
TWO
...
ONE 1
TWO 2
THREE 3
```

Select or download this

open  WRITEFILE , ">>$time.txt" or die "write error\n";
my $format = " %10s\n" x @totalexpenses . "%10s\n" x @totalcosts;
printf WRITEFILE  $format, @totalexpenses , @totalcosts;
close WRITEFILE; 
}