use Perl

• Testing whole scripts (Score:1)

  by cbrooks (3267)

  Test::Tutorial talks primarily about writing unit tests for modules. If you have existing scripts that you want to test, you may want to look into regression testing. Regression testing is used when releasing bug fixes and extensions to existing functionality to ensure that the overall level of functionality does not "regress" -- i.e. those things that worked in version 1.0 should keep working in version 1.1. I also find regression testing useful for poorly written legacy scripts. (For example, it is di
  • Re:Testing whole scripts (Score:1)

    by petdance (2468)

    You mean The Perl Review [theperlreview.com], right? :-)

    I'm about to roll out some HTML testing stuff today or tomorrow that might be useful, too, along those lines. It'll be wrappers around HTML::Lint.

    Maybe we should put up sample code that shows how people use the testing stuff in the real world.

    --
    

    --
    xoa
  • Re:Testing whole scripts (Score:1)

    by petdance (2468)

    # Here's a sample of a Session.t file that
    # corresponds to a Session.pm file I have.
    # It could certainly be more robust, and test
    # more options than just some simple scalars.
    
    #!/usr/bin/perl -w
    
    use strict;
    
    use constant SAVEPATH=>'/tmp';
    
    use Test::More tests=>7;
    
    BEGIN {
        use_ok( 'TW::Session' );
    }
    
    my $saved_session_id;
    
    CREATE: {
        my $session = new TW::Session( SavePath=>SAVEPATH );
        isa_ok( $session, 'TW::Session', 'Created first session' );
        $session-

    --
    

    --
    xoa