The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Win32::GuiTest::Examples - collection of the scripts from eg

Synopsis

This module was autogenerated from the files in the eg directory of the distribution. For detailed (cough) documenataion see Win32::GuiTest. To run the examples either copy-paste them from here or download and unpack the distribution and take the files from the eg directory.

Examples

END

open(MAN, "<manifest"); my @manifest = <MAN>; close(MAN);

foreach my $file (@manifest) { chomp $file; next if $file !~ m{eg/.*\.pl};

        print $out "\n=head2 $file\n\n";
        open my $fh, "<", $file;
        my @lines = <$fh>;
        print $out "    $_" foreach @lines;
}

print $out <<END;