Help for this page
#!/usr/bin/perl -w use strict; ... bless($self, $class); return $self; }
{ my %history; ... $self->{$attrib} = $value; } }
sub color { my $self = shift; if (@_) { ... } 1;
#!/usr/bin/perl -w use strict; ... $hist2->undo(); print $hist2->all(), "\n\n"; }
www.com | www.net | www.org
No recent polls found