examples/tutorial/22_string_ops_length.pir

   1 # Copyright (C) 2007-2009, Parrot Foundation.
   2 # $Id$
   3
   4 =head1 String Operations (continued)
   5
   6 To find the length of a string in PIR, use the length opcode. It works on
   7 any variable containing a basic Parrot string, but not the String PMC.
   8 C<length> returns an integer value, and 0 means an empty string.
   9
  10 =cut
  11
  12
  13 .sub main :main
  14
  15     $S0 = "Hello"
  16     $I0 = length $S0
  17     say $I0
  18
  19     .local string text
  20     text = "longer string"
  21     $I1 = length text
  22     say $I1
  23
  24 .end
  25
  26 # Local Variables:
  27 #   mode: pir
  28 #   fill-column: 100
  29 # End:
  30 # vim: expandtab shiftwidth=4 ft=pir:
  31