File: epoobj3.htm

package info (click to toggle)
libembperl-perl 2.0rc3-1
  • links: PTS
  • area: main
  • in suites: sarge
  • size: 5,688 kB
  • ctags: 5,161
  • sloc: ansic: 20,422; perl: 10,064; makefile: 5,134; cpp: 467; xml: 49; sh: 14
file content (19 lines) | stat: -rw-r--r-- 187 bytes parent folder | download | duplicates (11) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
 [! 
 
 sub new
	{
	my $self = shift ;

	$self -> {fontsize} = 5 ;
	$self -> {copyright} = 'Gerald Richter / ecos (c) 2000' ;
	}
 
 sub title 
	{ 
	'epoobj3 -> page3'
	} 
 
 !]

 PAGE 3