fork download 
  1. #!/bin/env perl
  2.  
  3. use strict;
  4. use warnings;
  5. use Time::HiRes qw/usleep/;
  6.  
  7. my $W = 100;
  8. my $H = 40;
  9.  
  10. my $canvas = make_canvas();
  11.  
  12. my $i = 2;
  13.  
  14. while ($i != 1000)
  15. {
  16.     draw($i);
  17.     print_canvas();
  18.     usleep(1000000);
  19.     $i += 10;
  20. }
  21.  
  22. sub print_canvas {
  23.     system("clear");
  24.     for (my $x = 0; $x < $H; ++$x) {
  25. 	for (my $y = 0; $y < $W; ++$y) {
  26. 	    print $canvas->[$x]->[$y];
  27. 	}
  28. 	print "\n";
  29.     }
  30. }
  31.  
  32. sub make_canvas {
  33.     my $result = [];
  34.     for (my $x = 0; $x < $H; ++$x) {
  35. 	$result->[$x] = [];
  36. 	for (my $y = 0; $y < $W; ++$y) {
  37. 	    $result->[$x]->[$y] = " ";
  38. 	}
  39.     }
  40.  
  41.     return $result;
  42. }
  43.  
  44. sub draw {
  45.     my ($K) = @_;
  46.  
  47.     my $N = 0;
  48.  
  49.     my $x = int($H / 2);
  50.     my $y = int($W / 2);
  51.  
  52.     my @groups = (
  53. 	{ x =>  1,  y =>  1 },
  54. 	{ x =>  1,  y => -1 },
  55. 	{ x => -1,  y => -1 },
  56. 	{ x => -1,  y =>  1 },
  57.     );
  58.  
  59.     $canvas->[$x]->[$y] = "#";
  60.     $K = $K - 1;
  61.  
  62.     while (1)
  63.     {
  64. 	my $px = $x - $N;
  65. 	my $py = $y;
  66. 	foreach my $el (@groups)
  67. 	{
  68. 	    my $counter = $N;
  69. 	    while ($counter != 0)
  70. 	    {
  71. 		$px += $el->{x};
  72. 		$py += $el->{y};
  73.  
  74. 		$canvas->[$px]->[$py] = "#";
  75.  
  76. 		$counter = $counter - 1;
  77. 		$K = $K - 1;
  78. 		if ($K == 0) {
  79. 		    return;
  80. 		}
  81. 	    }
  82. 	}
  83. 	$N++;
  84.     }
  85. }
  86.  
Time limit exceeded #stdin #stdout #stderr 5s 6784KB
comments (?)
stdin 
Standard input is empty
stdout 
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                  ##                                                
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                 ###                                                
                                                #####                                               
                                                 ###                                                
                                                  #                                                 
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                  ##                                                
                                                 ####                                               
                                               #######                                              
                                                #####                                               
                                                 ###                                                
                                                  #                                                 
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                  ##                                                
                                                 ####                                               
                                                ######                                              
                                               ########                                             
                                                ######                                              
                                                 ####                                               
                                                  ##                                                
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                  ##                                                
                                                 ###                                                
                                                #####                                               
                                               #######                                              
                                              #########                                             
                                               #######                                              
                                                #####                                               
                                                 ###                                                
                                                  #                                                 
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                  ##                                                
                                                 ####                                               
                                                ######                                              
                                               ########                                             
                                              ##########                                            
                                               ########                                             
                                                ######                                              
                                                 ####                                               
                                                 ###                                                
                                                  #                                                 
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                  ##                                                
                                                 ###                                                
                                                #####                                               
                                               #######                                              
                                              #########                                             
                                             ###########                                            
                                              #########                                             
                                               #######                                              
                                                #####                                               
                                                 ###                                                
                                                  #                                                 
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                  ##                                                
                                                 ####                                               
                                                ######                                              
                                               ########                                             
                                              ##########                                            
                                             ############                                           
                                              ##########                                            
                                               ########                                             
                                                ######                                              
                                                 ####                                               
                                                  ##                                                
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                  ##                                                
                                                 ####                                               
                                               #######                                              
                                              #########                                             
                                             ###########                                            
                                            #############                                           
                                             ###########                                            
                                              #########                                             
                                               #######                                              
                                                #####                                               
                                                 ###                                                
                                                  #                                                 
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                                                                    
                                                  ##                                                
                                                 ####                                               
                                                ######                                              
                                               ########                                             
                                              ##########                                            
                                             ############                                           
                                            ##############                                          
                                             ###########                                            
                                              #########                                             
                                               #######                                              
                                                #####                                               
                                                 ###                                                
                                                  #
stderr 
TERM environment variable not set.
TERM environment variable not set.
TERM environment variable not set.
TERM environment variable not set.
TERM environment variable not set.
TERM environment variable not set.
TERM environment variable not set.
TERM environment variable not set.
TERM environment variable not set.
TERM environment variable not set.
TERM environment variable not set.
https://ideone.com/iJuSQ0
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!