projects
/
platform
/
upstream
/
perl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
72a183a
)
Fix some bugs in the example code for perlootut
author
Dave Rolsky
<autarch@urth.org>
Thu, 15 Sep 2011 14:03:09 +0000
(09:03 -0500)
committer
Dave Rolsky
<autarch@urth.org>
Thu, 15 Sep 2011 14:03:18 +0000
(09:03 -0500)
pod/perlootut.pod
patch
|
blob
|
history
diff --git
a/pod/perlootut.pod
b/pod/perlootut.pod
index
f42dec7
..
52070bf
100644
(file)
--- a/
pod/perlootut.pod
+++ b/
pod/perlootut.pod
@@
-148,7
+148,7
@@
argument:
print "This file is at ", $self->path, "\n";
}
- $
larry->print_path
;
+ $
file->print_info
;
# The file is at /etc/hostname
What makes a method special is I<how it's called>. The arrow operator
@@
-166,7
+166,7
@@
name or an object. We can also pass additional arguments to the method:
print $prefix, ", ", $self->path, "\n";
}
- $
larry
->print_info("The file is located at ");
+ $
file
->print_info("The file is located at ");
# The file is located at /etc/hostname
=head2 Attributes