my @step = (1..9, 0);      # Use of comma operator, no need for push
my $step = join '', @step; # Use of specific function for the task
print ($step x 7);