Test::Folder - test folder attributes

Test-Dir documentation Contained in the Test-Dir distribution.

Index

Code Index:

NAME

Top

Test::Folder - test folder attributes

SYNOPSIS

Top

  use Test::More ...;
  use Test::Folder;

DESCRIPTION

Top

This modules provides a collection of test utilities for folder attributes. Use it in combination with Test::More in your test programs.

FUNCTIONS

Top

folder_exists_ok(FOLDERNAME [, TESTNAME] )

Ok if the folder exists, and not ok otherwise.

folder_not_exists_ok(FOLDERNAME [, TESTNAME] )

Ok if the folder does not exist, and not ok otherwise.

folder_empty_ok(FOLDERNAME [, TESTNAME] )

Ok if the folder is empty (contains no files or subfolders), and not ok otherwise.

folder_not_empty_ok(FOLDERNAME [, TESTNAME] )

Ok if the folder is not empty (contains any files or subfolders), and not ok otherwise.

folder_readable_ok(FOLDERNAME [, TESTNAME] )

Ok if the folder is readable, and not ok otherwise.

folder_not_readable_ok(FOLDERNAME [, TESTNAME] )

Ok if the folder is not readable, and not ok otherwise.

folder_writable_ok(FOLDERNAME [, TESTNAME] )

Ok if the folder is writable, and not ok otherwise.

folder_not_writable_ok(FOLDERNAME [, TESTNAME] )

Ok if the folder is not writable, and not ok otherwise.

folder_executable_ok(FOLDERNAME [, TESTNAME] )

Ok if the folder is executable, and not ok otherwise.

folder_not_executable_ok(FOLDERNAME [, TESTNAME] )

Ok if the folder is not executable, and not ok otherwise.

TO DO

Top

There are probably some more folder attributes that can be tested. If you need them, please ask (or better yet, contribute code!).

AUTHOR

Top

Martin 'Kingpin' Thurn, mthurn at cpan.org, http://tinyurl.com/nn67z.

BUGS

Top

Please report any bugs or feature requests to bug-test-dir at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Test-Dir. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

SUPPORT

Top

You can find documentation for this module with the perldoc command.

  perldoc Test::Folder

You can also look for information at:

* RT: CPAN's request tracker

http://rt.cpan.org/NoAuth/Bugs.html?Dist=Test-Dir

* AnnoCPAN: Annotated CPAN documentation

http://annocpan.org/dist/Test-Dir

* CPAN Ratings

http://cpanratings.perl.org/d/Test-Dir

* Search CPAN

http://search.cpan.org/dist/Test-Dir

ACKNOWLEDGEMENTS

Top

COPYRIGHT & LICENSE

Top

Copyright (C) 2007-2008 Martin 'Kingpin' Thurn

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

Test-Dir documentation Contained in the Test-Dir distribution. 
# $Id: Folder.pm,v 1.7 2011-02-20 01:57:51 Martin Exp $

package Test::Folder;

use strict;
use warnings;

our
$VERSION = do { my @r = (q$Revision: 1.7 $ =~ /\d+/g); sprintf "%d."."%03d" x $#r, @r };

use base qw( Exporter Test::Dir::Base );
our @EXPORT;
push @EXPORT, qw( folder_exists_ok folder_not_exists_ok );
push @EXPORT, qw( folder_empty_ok folder_not_empty_ok );
push @EXPORT, qw( folder_readable_ok folder_not_readable_ok );
push @EXPORT, qw( folder_writable_ok folder_not_writable_ok );
push @EXPORT, qw( folder_executable_ok folder_not_executable_ok );

$Test::Dir::Base::dir = q{folder};
$Test::Dir::Base::directory = q{folder};
$Test::Dir::Base::Dir = q{Folder};
$Test::Dir::Base::Directory = q{Folder};


sub folder_exists_ok
  {
  Test::Dir::Base::_dir_exists_ok(@_);
  } # folder_exists_ok



sub folder_not_exists_ok
  {
  Test::Dir::Base::_dir_not_exists_ok(@_);
  } # folder_not_exists_ok



sub folder_empty_ok
  {
  Test::Dir::Base::_dir_empty_ok(@_);
  } # folder_empty_ok


sub folder_not_empty_ok
  {
  Test::Dir::Base::_dir_not_empty_ok(@_);
  } # folder_not_empty_ok



sub folder_readable_ok
  {
  Test::Dir::Base::_dir_readable_ok(@_);
  } # folder_readable_ok


sub folder_not_readable_ok
  {
  Test::Dir::Base::_dir_not_readable_ok(@_);
  } # folder_not_readable_ok



sub folder_writable_ok
  {
  Test::Dir::Base::_dir_writable_ok(@_);
  } # folder_writable_ok


sub folder_not_writable_ok
  {
  Test::Dir::Base::_dir_not_writable_ok(@_);
  } # folder_not_writable_ok



sub folder_executable_ok
  {
  Test::Dir::Base::_dir_executable_ok(@_);
  } # folder_executable_ok


sub folder_not_executable_ok
  {
  Test::Dir::Base::_dir_not_executable_ok(@_);
  } # folder_not_executable_ok



1;

__END__