Help for this page

Select Code to Download


  1. or download this
    (append $u)='Bar';
    print $u;
    
  2. or download this
    print +(append 'Foo')='Bar';
    
  3. or download this
    perl -we'sub { print \$_[0]==\${\$_[0]}&&"no ","copy $]" }->("Bar")'