X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=examples%2Fpowers5;h=fe95d2d25d80eaf1043c98ebfaabc901426f041b;hb=c84b176b57423f679ce49f4ffe21b4069151bab0;hp=bc0c310534c2feb00a63f8569fa3334c334790b8;hpb=3797cda1b0da9caa24c7ff35e910e1f318c77918;p=term-progressbar.git

diff --git a/examples/powers5 b/examples/powers5
index bc0c310..fe95d2d 100644
--- a/examples/powers5
+++ b/examples/powers5
@@ -1,12 +1,17 @@
 #!/usr/bin/perl
+use strict;
+use warnings;
 
 use Term::ProgressBar 2.00;
 
 use constant MAX => 10_000_000;
 
 my $max = int($ARGV[0]+0) || MAX;
-my $progress = Term::ProgressBar->new({name => 'Powers', count => $max,
-                                       ETA => linear, });
+my $progress = Term::ProgressBar->new({
+	name => 'Powers',
+	count => $max,
+	ETA => 'linear',
+});
 $progress->max_update_rate(1);
 my $next_update = 0;