Help for this page

Select Code to Download


  1. or download this
    use Time::HiRes qw( sleep);
    
    ...
        substr( $image[ $y], 2*$x, 1) = '@';
        @image;
    }