File: 06_const_it.t

package info (click to toggle)
libconfig-auto-perl 0.44-2
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, forky, sid, trixie
  • size: 164 kB
  • sloc: perl: 397; makefile: 2
file content (20 lines) | stat: -rw-r--r-- 432 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
#!perl

use Test::More 'no_plan';
use strict;

use Config::Auto;

my $test_file = 't/fstab'; # A file found on any Unix/Linux machine.

SKIP: {
    skip "Can't test: $test_file doesn't exist on this system."
        unless -e $test_file;

    for ( 'bar' ) {
        eval { Config::Auto::parse($test_file); };
        ok( !$@,
            'Config::Auto:parse() where $_ aliases a string literal.' );
        diag($@) if $@;
    }
}