A one liner:

perl -ne 'print $_ x ++$i, " " for split //'
[download]

To understand, read print, split, perlvar (explains $_), perlop (explains x, ++, and //), perlsyn (explains for), and perlrun (explains -ne).

Welcome to the monastery.

This sounds a lot like homework. WeI don't have problems helping with homework, as long as it is stated up front, and you show your work.

Some things that may help you find a solution:

• substr
• split
• foo($_) for ( $start .. $stop ) # see perlvar
• print

Also, please note that this should have been posted in SoPW, not meditations. It has been moved.

Update: s/We/I/; # I do not speak for perlmonks, only for myself. And then only when I am not chewing on my foot.

$_="12345";s/./$&x$+[0].$"/ge;print
[download]

#include <iostream>
#include <string>

using namespace std;

int main () {
  string user_input;
  cout << "Please enter a five digit integer: ";
  cin >> user_input;
  for ( size_t ix = 0; ix != user_input.size(); ++ix ) {
    for ( size_t count = 0; count <= ix; ++count )
      cout << user_input.at(ix);
    cout << endl;
  }
  return 0;
}
[download]

Oh, you your instructor wanted Perl? This is where you'll have to learn to adapt. ;) Update: Actually Perl can adapt for you:

#!/usr/bin/env perl

use strict;
use warnings;

use Inline CPP => <<'EOC';
#include <iostream>
#include <string>

void doit () {
  std::string user_input;
  std::cout << "Please enter a five digit integer: ";
  std::cin >> user_input;
  for ( size_t ix = 0; ix != user_input.size(); ++ix ) {
    for ( size_t count = 0; count <= ix; ++count )
      std::cout << user_input.at(ix);
    std::cout << std::endl;
  }
}
EOC

doit;
[download]

After you turn in a serious solution, try this just for fun. :)

print "insert 5 digit number:\n"; $string = <STDIN>; for ($i=1; $i<=5; $i++) { $var = substr($string,$i-1,1) Print "$var\n"; } For this i am getting output as: 1 2 3 4 5 someone help me out i am new to perl i need output as 1 22 333 4444 55555

You are almost there. The only thing missing is to repeat each digit. For that, you can include another loop, or use the repetition operator as adviced in my first reply to your question.

Also, please use <code> ... </code> tags for code and data samples to improve readability.

لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ