my ($i, $j, $k) = (2, 0, 4);  # make up some data values

my $ltr = "i";
my $combined = join "", map { $_ &&= "$ltr=$_ "; $ltr++; ($_)? $_:"" } ( $i, $j, $k );

print $combined, "\n";