fork download
copy 
  1. #!/usr/bin/perl
  2.  
  3. #
  4. # Task		: Evidences of the Hate Crime againt the Russian President / 2026 AD
  5. # Author	: Dmitry S. Kuznetsov, 1987
  6. # Year		: 19th September, 2026
  7. #
  8.  
  9. # HELLO. It is a SETTING ... 
  10.  
  11. my $putin = " staraya ";
  12. my $vladimir = " pizda ";
  13. my $vladimirovich = " and ";
  14. my $president = " mooduck ";
  15.  
  16. # ... tnan, it is a PRINTING ...
  17.  
  18. print ($putin, $vladimir, $vladimirovich, $president);
  19.  
  20. # 
  21. # ... at last, it is the END.
  22. #
Success #stdin #stdout 0.01s 5288KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
 staraya  pizda  and  mooduck
https://ideone.com/7IPTW1
language:
Perl (perl 5.28.1)
created:
19 hours 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!