lib/Attribute/Handlers/README

   1 ==============================================================================
   2                 Release of version 0.70 of Attribute::Handlers
   3 ==============================================================================
   4
   5
   6 NAME
   7     Attribute::Handlers - Simpler definition of attribute handlers
   8
   9 DESCRIPTION
  10     This module, when inherited by a package, allows that package's class to
  11     define attribute handler subroutines for specific attributes. Variables
  12     and subroutines subsequently defined in that package, or in packages
  13     derived from that package may be given attributes with the same names as
  14     the attribute handler subroutines, which will then be called at the end
  15     of the compilation phase (i.e. in a `CHECK' block).
  16
  17 EXAMPLE
  18
  19         package UNIVERSAL;
  20         use Attribute::Handlers;
  21
  22         my %name;
  23         sub name { return $name{$_[2]}||*{$_[1]}{NAME} }
  24
  25         sub Name    :ATTR { $name{$_[2]} = $_[4] }
  26
  27         sub Purpose :ATTR { print STDERR "Purpose of ", &name, " is $_[4]\n" }
  28
  29         sub Unit    :ATTR { print STDERR &name, " measured in $_[4]\n" }
  30
  31
  32         package main;
  33
  34         my $capacity : Name(capacity)
  35                      : Purpose(to store max storage capacity for files)
  36                      : Unit(Gb);
  37
  38         package Other;
  39
  40         sub foo : Purpose(to foo all data before barring it) { }
  41
  42
  43 AUTHOR
  44     Damian Conway (damian@conway.org)
  45
  46 COPYRIGHT
  47              Copyright (c) 2001, Damian Conway. All Rights Reserved.
  48            This module is free software. It may be used, redistributed
  49           and/or modified under the terms of the Perl Artistic License
  50                 (see http://www.perl.com/perl/misc/Artistic.html)
  51
  52
  53 ==============================================================================
  54
  55 CHANGES IN VERSION 0.70
  56
  57 (No changes have been documented for this version)
  58
  59 ==============================================================================
  60
  61 AVAILABILITY
  62
  63 Attribute::Handlers has been uploaded to the CPAN
  64 and is also available from:
  65
  66         http://www.csse.monash.edu.au/~damian/CPAN/Attribute-Handlers.tar.gz
  67
  68 ==============================================================================