fork download 
  1. #!/usr/bin/perl
  2.  
  3. $foo = "3d8";
  4. print "$foo\n";
  5. $foo++;
  6. print "$foo\n";
  7. print "------\n";
  8.  
  9. $foo = "aaz";
  10. print "$foo\n";
  11. $foo++;
  12. print "$foo\n";
  13. $foo++;
  14. print "$foo\n";
  15. print "------\n";
  16.  
  17.  
  18. $foo = "qz9";
  19. print "$foo\n";
  20. $foo++;
  21. print "$foo\n";
  22. $foo++;
  23. print "$foo\n";
Success #stdin #stdout 0s 6044KB
comments (?)
stdin 
Standard input is empty
stdout 
3d8
4
------
aaz
aba
abb
------
qz9
ra0
ra1
https://ideone.com/qBwOpb
language:
Perl (perl 5.28.1)
created:
8 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!