Polyglot

regExecute the following programs. Each program is one-liner.

IN

print "Hello, Python!"

OUT

Hello, Python!

IN

print("Hello, Python3!")

OUT

Hello, Python3!

IN

echo "Hello, Bash!"

OUT

Hello, Bash!

IN

<html><?php echo "Hello, PHP!";?></html>

OUT

Hello, PHP!
Login to submit solution


5 symbols pyth
Mon Sep 19 15:08:19 2016 Sait2000
htczN
12 symbols bash
Wed Jul 27 01:22:32 2016 hidefromkgb
grep -o H.*!
12 symbols perl
Sat Aug 13 04:12:52 2016 vakorol
#!/usr/bin/perl -pF"
$_=@F[1]
13 symbols perl
Sun Aug 10 00:23:15 2014 danieljabailey
#!/usr/bin/perl -F"
print@F[1]
13 symbols perl
Mon Aug 25 08:30:20 2014 gabrielmad
#!/usr/bin/perl -paF"
$_=@F[1]
13 symbols ruby2.0
Sun Oct 5 20:46:40 2014 fl00r
#!/usr/bin/ruby2.0 -paF"
$_=$F[1]
13 symbols perl
Wed Jan 14 01:05:31 2015 dmitry-tiger
#!/usr/bin/perl -apF"
$_=$F[1]
14 symbols perl
Sun Aug 10 00:23:33 2014 danieljabailey
#!/usr/bin/perl -aF"
print@F[1]
14 symbols perl
Mon Aug 25 03:12:12 2014 gabrielmad
#!/usr/bin/perl -panF"
$_=@F[1]
15 symbols perl
Sat Aug 2 21:23:12 2014 danieljabailey
#!/usr/bin/perl -anF"
print@F[1]
15 symbols bash
Thu Aug 7 05:42:40 2014 PixelIndigo
grep -Po "H.+!"
17 symbols perl
Sat Aug 2 21:21:56 2014 danieljabailey
#!/usr/bin/perl -anF"
print(@F[1])
22 symbols perl
Sat Aug 2 18:23:43 2014 danieljabailey
#!/usr/bin/perl -n
print((split'"')[1])
23 symbols perl
Tue Sep 16 03:17:15 2014 maxymania
$_=<>;m;"(.*)";;print$1
27 symbols perl
Fri Aug 1 19:19:33 2014 vik
@a=split('"',<>);print$a[1]
28 symbols perl
Fri Aug 1 19:19:11 2014 vik
@a=split('"',<>);print $a[1]
28 symbols python3
Sat Aug 9 18:37:21 2014 z423x5c6
print(input().split('"')[1])
28 symbols bash
Wed Jan 14 03:53:34 2015 beched
sed -n 's/.*"\(.*\)".*/\1/p'
31 symbols python2
Fri Aug 8 03:13:00 2014 PFischbeck
print raw_input().split('"')[1]
31 symbols bash
Tue Jan 13 23:47:45 2015 beched
sed -n 's/.*"\(.*\)".*/\1/p'<&0

View all solutions