~ubuntu-branches/debian/sid/kdevelop/sid

« back to all changes in this revision

Viewing changes to languages/perl/file_templates/pm

  • Committer: Bazaar Package Importer
  • Author(s): Jeremy Lainé
  • Date: 2010-05-05 07:21:55 UTC
  • mfrom: (1.2.3 upstream) (5.1.2 squeeze)
  • Revision ID: james.westby@ubuntu.com-20100505072155-h78lx19pu04sbhtn
Tags: 4:4.0.0-2
* Upload to unstable (Closes: #579947, #481832).
* Acknowledge obsolete NMU fixes (Closes: #562410, #546961).

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
 
package $MODULE$;
2
 
 
3
 
use strict;
4
 
 
5
 
require Exporter;
6
 
use vars       qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
7
 
 
8
 
# set the version for version checking
9
 
$VERSION     = $VERSION$;
10
 
 
11
 
@ISA         = qw(Exporter);
12
 
@EXPORT      = qw(&hello);
13
 
%EXPORT_TAGS = ( );     # eg: TAG => [ qw!name1 name2! ],
14
 
 
15
 
# your exported package globals go here,
16
 
# as well as any optionally exported functions
17
 
@EXPORT_OK   = qw($Var1 %Hashit &func3);
18
 
 
19
 
use vars qw($Var1 %Hashit);
20
 
# non-exported package globals go here
21
 
use vars qw(@more $stuff);
22
 
 
23
 
# initialize package globals, first exported ones
24
 
$Var1   = '';
25
 
%Hashit = ();
26
 
 
27
 
# then the others (which are still accessible as $Some::Module::stuff)
28
 
$stuff  = '';
29
 
@more   = ();
30
 
 
31
 
 
32
 
# file-private lexicals go here
33
 
my $priv_var    = '';
34
 
my %secret_hash = ();
35
 
 
36
 
 
37
 
sub hello {
38
 
 print "hello world\n"; 
39
 
}
40
 
 
41
 
 
42
 
END { }       # module clean-up code here (global destructor)
43
 
 
44
 
1;
45
 
 
46
 
__END__
47
 
 
48
 
=head1 NAME
49
 
 
50
 
ModuleName - short discription of your program
51
 
 
52
 
=head1 SYNOPSIS
53
 
 
54
 
 how to us your module
55
 
 
56
 
=head1 DESCRIPTION
57
 
 
58
 
 long description of your module
59
 
 
60
 
=head1 SEE ALSO
61
 
 
62
 
 need to know things before somebody uses your program
63
 
 
64
 
=head1 AUTHOR
65
 
 
66
 
 $AUTHOR$
67
 
 
68
 
=cut