CA Quine

This is a quine—a self-replicating program—that, when executed, outputs its own source code. Additionally, the output of this quine resembles the ASCII art of the Canadian flag.

eval$s=%w(s=%(eval$s                                        =%w(#{$s})*"");b="BA
hsK2n//w8AAAAA8P////                                        8PAAAAAPD/////DwCAAw
Dw/////w8AwAcA8P////                   8PA                  Pw/APD/////DwD8PwDw/
////w/A/D8D8P////8P/                  vvff/                 D/////D////z/w/////w
/8//8/8P////8P//////              D/////D/j//z              /w/////w/g//8H8P////
8PAP//AfD/////D4D//w              Hw/////w8AgA              EA8P////8PAIABAPD///
//DwCAAQDw/////w8AgA          EA  8P////8PAAAA  AP          D//w==";n=Marshal.lo
ad(b.unpack('m')[0])     ;sz=s.siz e;i=0;j=0; o='';whil     e(i<sz&&j<20*80);if(
n&(1<<j)).zero?;o+=3    2.chr;else;o+=s[i];i+=1;end;if      (j%80==79);o+="\n";e
nd;j+=1;end;puts(o);      #eval$s=%w{s=%(eval$s=%w(#{$      s})*"");b="BAhsK2n//
w8AAAAA8P////8PAAAAA    PD/////DwCAAwDw/////w8AwAcA8P///    /8PAPw/APD/////DwD8P
wDw/////w/A/D8D8P///       /8P/vvff/D/////D////z/w////      /w/8//8/8P////8P////
//D/////D/j//z/w////         /w/g//8H8P////8PAP//Af         D/////D4D//wHw/////w
8AgAEA8P////8PAIABAP            D/////DwCAAQDw///           //w8AgAEA8P////8PAAA
AAPD//w==";n=Marshal           .load(b.unpack('m'           )[0]);sz=s.size;i=0;
j=0;o='';while(i<sz&                   j<                   20*80);if(n&(1<<j)).
zero?;o+=32.chr;else                   ;o                   +=s[i];i+=1;end;if(j
%80==79);o+="\n";end                   ;j                   +=1;end;puts(o);q@ev
al$s=@j;}*"";eval$s=                   %w                   {s=%{eval$s=%w(#{$s}
)*""};b="BAhsK2n//w8                                        AAAAA8P////8PAAA)*""

>>> ruby ca.rb > _ca.rb
>>> diff -s ca.rb _ca.rb
Files ca.rb and _ca.rb are identical