foreach (@step) {
  $step = $step . $_;  # or shorthand: $step .= $_
}

##</code><code>##

Use of uninitialized value in concatenation (.) or string

##</code><code>##

$_ =~ /($what){3}/  # match things in $what 3 times