view release on metacpan or  search on metacpan

lib/CPANPLUS/Dist/Debora/Util.pm  view on Meta::CPAN

=head2 unix_path

  my $path = unix_path($path);

Converts an OS specific path into a Unix path with forward slashes.

=head2 filetype

  my $type = filetype($filename);

Determines a file's type.  Returns "data", "executable", "script" or "text";

=head2 find_most_recent_mtime

  my $mtime = find_most_recent_mtime($sourcedir);

Searches the specified directory recursively for the last modified file.
Returns the modification time.

=head2 find_shared_objects

  my @filenames = @{find_shared_objects($stagingdir)};

Searches the specified directory recursively for shared objects and executable
programs.

=head2 is_testing

  my $is_testing = is_testing;

Returns true if automated or release testing is enabled.

=head1 DIAGNOSTICS

=over

=item B<< Could not run 'COMMAND' >>

An external command could not be run.

=back

=head1 CONFIGURATION AND ENVIRONMENT

=head2 Environment variables

=head3 AUTOMATED_TESTING, RELEASE_TESTING

The test mode is enabled if any of these variables is set.  No packages are
installed in test mode.

=head1 DEPENDENCIES

Requires only modules that are distributed with Perl.

=head1 INCOMPATIBILITIES

None.

=head1 BUGS AND LIMITATIONS

Install L<IPC::Run> if IPC::Open3 causes IO::Select to output warnings.

=head1 AUTHOR

Andreas Vögele E<lt>voegelas@cpan.orgE<gt>

=head1 LICENSE AND COPYRIGHT

Copyright (C) 2025 Andreas Vögele

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

=cut