File: 02-reggrp.t

package info (click to toggle)
libregexp-reggrp-perl 1.002001-1
  • links: PTS, VCS
  • area: main
  • in suites: buster, jessie, jessie-kfreebsd, stretch, wheezy
  • size: 196 kB
  • ctags: 123
  • sloc: perl: 2,251; makefile: 2
file content (19 lines) | stat: -rw-r--r-- 384 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
#!perl -T

use Test::More;

SKIP: {
    my $not = 1;

    eval( 'use Regexp::RegGrp::Data' );
    skip( 'Regexp::RegGrp::Data not installed!', $not ) if ( $@ );

    eval( 'use Regexp::RegGrp' );
    skip( 'Regexp::RegGrp not installed!', $not ) if ( $@ );

    plan tests => $not;

    my $reggrp = Regexp::RegGrp->new();

    ok( ! $reggrp, 'Regexp::RegGrp->new() without args' );
}