Checking if your kit is complete... Looks good Writing Makefile for HTML::Expander Microsoft (R) Program Maintenance Utility Version 7.10.3077 Copyright (C) Microsoft Corporation. All rights reserved. cp Expander.pm blib\lib\HTML\Expander.pm Microsoft (R) Program Maintenance Utility Version 7.10.3077 Copyright (C) Microsoft Corporation. All rights reserved. C:\cpanrun\build\5-10-0\bin\perl.exe "-Iblib\lib" "-Iblib\arch" test.pl 1..1 # Running under perl version 5.010000 for MSWin32 # Win32::BuildNumber 1001 # Current time local: Sun Dec 16 07:59:49 2007 # Current time GMT: Sun Dec 16 15:59:49 2007 # Using Test.pm version 1.25
(current mode is '')

This is me

(cyrrent mode is '')

empty

1. 2.opala! 3.opala! Sun Dec 16 07:59:50 PST 2007 use Test; BEGIN { plan tests => 1 }; use HTML::Expander; use strict; my $ex = new HTML::Expander; $ex->{ 'WARNINGS' }++; $ex->define_tag( 'main', '

', '

' ); $ex->define_tag( 'main', '

', '

' ); $ex->mode_copy( 'new', 'main' ); $ex->define_tag( 'new', '

', '

' ); $ex->define_tag( 'new', '', '
' );
$ex->define_tag( 'new', '',  '
' ); print $ex->expand( "
(current mode is '')
This is me (cyrrent mode is '') empty 1.opala! 2.opala! 3. \n" ); $ex->{ 'EXEC_TAG_ALLOWED' } = 1; print $ex->expand( 'Sun Dec 16 07:59:52 PST 2007 ' ), "\n"; $ex->add_inc_paths( '.' ); print $ex->expand( '' ), "\n"; print "done."; # use Data::Dumper; # print Dumper( $ex ); ok(1); # there is no bad condition check yet done.ok 1 Microsoft (R) Program Maintenance Utility Version 7.10.3077 Copyright (C) Microsoft Corporation. All rights reserved. Installing C:\cpanrun\build\5-10-0\html\site\lib\HTML\Expander.html Installing C:\cpanrun\build\5-10-0\site\lib\HTML\Expander.pm Appending installation info to C:\cpanrun\build\5-10-0\lib/perllocal.pod