fork download
copy 
  1. $str1=<stdin>;
  2.  
  3. $str2="aa";
  4.  
  5. $x=index($str1,$str2);
  6.  
  7. Until($i>$x)
  8.  
  9. {
  10.  
  11.   print "$str1";
  12.  
  13. }
Runtime error #stdin #stdout #stderr 0s 17496KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
Standard output is empty
stderr
copy 
syntax error at prog.pl line 9, near ")

{"
Execution of prog.pl aborted due to compilation errors.
https://ideone.com/kAY2yw
language:
Perl (perl 5.28.1)
created:
7 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!