exp/SDL/Rect/lib/SDL/Rect.pm

   1 package SDL::Rect;
   2 use strict;
   3
   4
   5     use vars qw($VERSION @ISA @EXPORT);
   6     $VERSION     = '0.01';
   7     require Exporter;
   8     require DynaLoader;
   9     @ISA = qw(Exporter DynaLoader);
  10     @EXPORT = qw( NewRect RectX RectY RectW RectH);
  11
  12
  13
  14
  15 #################### subroutine header begin ####################
  16
  17 =head2 sample_function
  18
  19  Usage     : How to use this function/method
  20  Purpose   : What it does
  21  Returns   : What it returns
  22  Argument  : What it wants to know
  23  Throws    : Exceptions and other anomolies
  24  Comment   : This is a sample subroutine header.
  25            : It is polite to include more pod and fewer comments.
  26
  27 See Also   :
  28
  29 =cut
  30
  31 #################### subroutine header end ####################
  32
  33
  34
  35 #################### main pod documentation begin ###################
  36 ## Below is the stub of documentation for your module.
  37 ## You better edit it!
  38
  39
  40 =head1 NAME
  41
  42 SDL::Rect - Bindings to rect obj and its functions in the C SDL libs
  43
  44 =head1 SYNOPSIS
  45
  46   use SDL::Rect;
  47   blah blah blah
  48
  49
  50 =head1 DESCRIPTION
  51
  52 Stub documentation for this module was created by ExtUtils::ModuleMaker.
  53 It looks like the author of the extension was negligent enough
  54 to leave the stub unedited.
  55
  56 Blah blah blah.
  57
  58
  59 =head1 USAGE
  60
  61
  62
  63 =head1 BUGS
  64
  65
  66
  67 =head1 SUPPORT
  68
  69
  70
  71 =head1 AUTHOR
  72
  73     Kartik Thakore
  74     CPAN ID: KTHAKORE
  75     none
  76     KTHAKORE@CPAN.ORG
  77     http://yapgh.blogspot.com/
  78
  79 =head1 COPYRIGHT
  80
  81 This program is free software; you can redistribute
  82 it and/or modify it under the same terms as Perl itself.
  83
  84 The full text of the license can be found in the
  85 LICENSE file included with this module.
  86
  87
  88 =head1 SEE ALSO
  89
  90 perl(1).
  91
  92 =cut
  93
  94 #################### main pod documentation end ###################
  95
  96 bootstrap SDL::Rect $VERSION;
  97
  98 1;
  99 # The preceding line will help the module return a true value
 100