App-bk
view release on metacpan - search on metacpan
view release on metacpan or search on metacpan
t/no_files.t view on Meta::CPAN
#!perl
use strict;
use warnings;
use Test::More tests => 2;
use Test::Trap;
use_ok("App::bk");
local @ARGV = ();
my $r = trap { App::bk::backup_files(); };
like( $trap->stderr, qr/No filenames provided./, 'No files error ok' );
view all matches for this distributionview release on metacpan - search on metacpan
( run in 0.490 second using v1.00-cache-2.02-grep-82fe00e-cpan-2c419f77a38b )