Catalyst-Plugin-CodeEval

 view release on metacpan or  search on metacpan

META.yml  view on Meta::CPAN

# http://module-build.sourceforge.net/META-spec.html
#XXXXXXX This is a prototype!!!  It will change in the future!!! XXXXX#
name:         Catalyst-Plugin-CodeEval
version:      0.012
version_from: lib/Catalyst/Plugin/CodeEval.pm
installdirs:  site
requires:
    Catalyst:                      5.57
    PadWalker:                     1.0

distribution_type: module
generated_by: ExtUtils::MakeMaker version 6.17

Makefile.PL  view on Meta::CPAN

use 5.008002;
use ExtUtils::MakeMaker;
# See lib/ExtUtils/MakeMaker.pm for details of how to influence
# the contents of the Makefile that is written.
WriteMakefile(
    NAME              => 'Catalyst::Plugin::CodeEval',
    VERSION_FROM      => 'lib/Catalyst/Plugin/CodeEval.pm', # finds $VERSION
    PREREQ_PM         => {'Catalyst' => '5.57',
			  'PadWalker' => '1.0'},
    ($] >= 5.005 ?     ## Add these new keywords supported since 5.005
      (ABSTRACT_FROM  => 'lib/Catalyst/Plugin/CodeEval.pm', # retrieve abstract from module
       AUTHOR         => 'Shota Takayama <shot[atmark]bindstorm.jp>') : ()),
);

lib/Catalyst/Plugin/CodeEval.pm  view on Meta::CPAN

package Catalyst::Plugin::CodeEval;

use strict;
use warnings;
use PadWalker qw(peek_my);

our $VERSION = '0.012';

my($Revision) = '$Id: CodeEval.pm,v 1.6 2006/02/14 09:40:47 Sho Exp $';


=head1 NAME

Catalyst::Plugin::CodeEval - Module for huge Catalyst application development.

lib/Catalyst/Plugin/CodeEval.pm  view on Meta::CPAN

    $c->log->debug("+++++ CodeEval : load script file ($script_file) +++++");

    open(CODEFILE, $script_file) or die "can not open $script_file\n";
    my $code = join("",<CODEFILE>);
    close(CODEFILE);
    return $code
}

=head1 SEE ALSO

L<Catalyst> L<PadWalker>

=head1 AUTHOR

Shota Takayama, C<shot[atmark]bindstorm.jp>

=head1 COPYRIGHT AND LICENSE

This program is free software, you can redistribute it and/or modify it under
the same terms as Perl itself.