NAME

Test::Inline::Content::Legacy - Test::Inline 2 Content Handler for legacy functions

VERSION

version 2.214

SYNOPSIS

Custom script content generation using Test::Inline 2.000+ with a custom generator functions

  my $header = "....";
  my $function = sub {
        my $Object = shift;
        my $Script = shift;
        return $header . $Script->merged_content;
  };
  
  my $Inline = Test::Inline->new(
        ...
        file_content => $function,
        );

Migrating this same code to Test::Inline 2.100+ ContentHandler objects

  my $header = "....";
  my $function = sub {
        my $Object = shift;
        my $Script = shift;
        return $header . $Script->merged_content;
  };
  
  my $ContentHandler = Test::Inline::Content::Legacy->new( $function );
  
  my $Inline = Test::Inline->new(
        ...
        ContentHandler => $ContentHandler,
        );

DESCRIPTION

This class exists to provide a migration path for anyone using the custom script generators in Test::Inline via the file_content param.

The synopsis above pretty much says all you need to know.

METHODS

new $CODE_ref

The new constructor for Test::Inline::Content::Legacy takes a single parameter of a CODE reference, as you would have previously provided directly to file_content.

Returns a new Test::Inline::Content::Legacy object, or undef if not passed a CODE reference.

coderef

The coderef accessor returns the CODE reference for the object

process $Inline $Script

The process method works with the legacy function by passing the Test::Inline and Test::Inline::Script arguments straight through to the legacy function, and returning it's result as the return value.

SUPPORT

See the main SUPPORT section.

Bugs may be submitted through the RT bug tracker (or bug-Test-Inline@rt.cpan.org).

AUTHOR

Adam Kennedy <adamk@cpan.org>

COPYRIGHT AND LICENSE

This software is copyright (c) 2003 by Adam Kennedy.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.