Ideone.com

fork download

copy

#!/usr/bin/perl
 
while (($_=<>)!=42) {print $_;}

Success #stdin #stdout 0s 4596KB

stdin

copy

6
42
3

stdout

copy

https://ideone.com/DdLTy

language:

Perl (perl 5.28.1)

created:

visibility:

public

Share or Embed source code

The brand new service which powers Ideone!

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