home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / perl560.zip / t / pod / special_seqs.xr < prev    next >
Text File  |  2000-02-21  |  990b  |  23 lines
  1.     This is a test to see if I can do not only `$self' and `method()', but
  2.     also `$self->method()' and `$self->{FIELDNAME}' and `$Foo <=> $Bar'
  3.     without resorting to escape sequences. If I want to refer to the
  4.     right-shift operator I can do something like `$x >> 3' or even `$y >>
  5.     5'.
  6.  
  7.     Now for the grand finale of `$self->method()->{FIELDNAME} = {FOO=>BAR}'.
  8.     And I also want to make sure that newlines work like this
  9.     `$self->{FOOBAR} >> 3 and [$b => $a]->[$a <=> $b]'
  10.  
  11.     Of course I should still be able to do all this *with* escape sequences
  12.     too: `$self->method()' and `$self->{FIELDNAME}' and `{FOO=>BAR}'.
  13.  
  14.     Dont forget `$self->method()->{FIELDNAME} = {FOO=>BAR}'.
  15.  
  16.     And make sure that `0' works too!
  17.  
  18.     Now, if I use << or >> as my delimiters, then I have to use whitespace.
  19.     So things like `<$self-'method()>> and `<$self-'{FIELDNAME}>> wont end
  20.     up doing what you might expect since the first > will still terminate
  21.     the first < seen.
  22.  
  23.