# Copyright (C) 2004-2009, Parrot Foundation. # $Id: japh3.pasm 40268 2009-07-25 19:53:04Z whiteknight $ # the substr JaPH set S0, "Hacker\n" set S1, "Parrot " set S2, "another " set S3, "Just " set S31, S0 substr S3, 5, 1, S2 substr S3, 13, 1, S1 substr S3, 20, 1, S0 print S3 end # Local Variables: # mode: pir # fill-column: 100 # End: # vim: expandtab shiftwidth=4 ft=pir: