← Back to branch summary

~ubuntu-branches/ubuntu/maverick/libtext-pdf-perl/maverick

« back to all changes in this revision

Viewing changes to lib/Text/PDF/Number.pm

  • Committer: Bazaar Package Importer
  • Author(s): Gunnar Wolf
  • Date: 2003-06-19 13:37:58 UTC
  • Revision ID: james.westby@ubuntu.com-20030619133758-6qa8nc1qryh9fv33
Tags: upstream-0.25
Import upstream version 0.25

Show diffs side-by-side

added added

removed removed

Lines of Context:
lib/Text/PDF/Number.pm
 
1
package Text::PDF::Number;
 
2
 
 
3
=head1 NAME
 
4
 
 
5
Text::PDF::Number - Numbers in PDF. Inherits from L<Text::PDF::String>
 
6
 
 
7
=head1 METHODS
 
8
 
 
9
=cut
 
10
 
 
11
use strict;
 
12
use vars qw(@ISA);
 
13
# no warnings qw(uninitialized);
 
14
 
 
15
use Text::PDF::String;
 
16
@ISA = qw(Text::PDF::String);
 
17
 
 
18
 
 
19
=head2 $n->convert($str)
 
20
 
 
21
Converts a string from PDF to internal, by doing nothing
 
22
 
 
23
=cut
 
24
 
 
25
sub convert
 
26
{ return $_[1]; }
 
27
 
 
28
 
 
29
=head2 $n->as_pdf
 
30
 
 
31
Converts a number to PDF format
 
32
 
 
33
=cut
 
34
 
 
35
sub as_pdf
 
36
{ $_[0]->{'val'}; }
 
37
 
 
38