Help for this page

Select Code to Download


  1. or download this
    $song = "nanananaaabatmannanananaaabatmannanananaaabatman";
    @batmen = split /nananana+/, $song;
    
  2. or download this
    $song = "nanananaaabatmannanaaabatmannananananaaabatman";
    @batmen = split /(na)*na+/, $song;