#!/usr/bin/perl -w
 
use strict;
 
 
=head1 Foo Method
 
Typical call syntax would be:
 
=over 8
 
  my $ret = $obj->foo( 'LITERAL STRING' );
 
=back
 
=cut