App-TestOnTap

 view release on metacpan or  search on metacpan

META.json  view on Meta::CPAN

            "Getopt::Long" : "0",
            "Grep::Query" : "1.006",
            "JSON" : "0",
            "LWP::Simple" : "0",
            "List::MoreUtils" : "0.428",
            "List::Util" : "0",
            "Net::Domain" : "0",
            "POSIX" : "0",
            "Pod::Simple::Search" : "0",
            "Pod::Usage" : "0",
            "Sort::Naturally" : "0",
            "TAP::Formatter::Console" : "0",
            "TAP::Formatter::File" : "0",
            "TAP::Parser::Scheduler::Job" : "0",
            "TAP::Parser::Scheduler::Spinner" : "0",
            "UUID::Tiny" : "0",
            "perl" : "5.010001"
         }
      },
      "test" : {
         "requires" : {

META.yml  view on Meta::CPAN

  Getopt::Long: '0'
  Grep::Query: '1.006'
  JSON: '0'
  LWP::Simple: '0'
  List::MoreUtils: '0.428'
  List::Util: '0'
  Net::Domain: '0'
  POSIX: '0'
  Pod::Simple::Search: '0'
  Pod::Usage: '0'
  Sort::Naturally: '0'
  TAP::Formatter::Console: '0'
  TAP::Formatter::File: '0'
  TAP::Parser::Scheduler::Job: '0'
  TAP::Parser::Scheduler::Spinner: '0'
  UUID::Tiny: '0'
  perl: '5.010001'
resources:
  repository: https://github.com/kenneth-olwing/App-TestOnTap.git
version: '1.001'
x_serialization_backend: 'CPAN::Meta::YAML version 0.018'

Makefile.PL  view on Meta::CPAN

			'Getopt::Long'						=>	0,		# initial dev used: 2.47
			'Grep::Query'						=>	1.006,
			'JSON'								=>	0,		# initial dev used: 2.90
			'List::Util'						=>	0,		# Core 5.24
			'List::MoreUtils'					=>	0.428,	# Must have 'singleton'
			'LWP::Simple'						=>	0,		# initial dev used: 6.17
			'Net::Domain'						=>	0,		# initial dev used: 3.07
			'POSIX'								=>	0,		# initial dev used: 1.38_03
			'Pod::Simple::Search'				=>	0,		# initial dev used: 3.35 
			'Pod::Usage'						=>	0,		# initial dev used: 1.67
			'Sort::Naturally'					=>	0,		# initial dev used: 1.03
			'TAP::Formatter::Console'			=>	0,		# initial dev used: 3.35
			'TAP::Formatter::File'				=>	0,		# initial dev used: 3.35
			'TAP::Parser::Scheduler::Job'		=>	0,		# initial dev used: 3.35
			'TAP::Parser::Scheduler::Spinner'	=>	0,		# initial dev used: 3.35
			'UUID::Tiny'						=>	0,		# initial dev used: 1.04
		},
	dist  =>
		{
			$IS_WIN32 ? (TARFLAGS => '--mode=755 -cvf') : (),
			COMPRESS => 'gzip -9f',

lib/App/TestOnTap/OrderStrategy.pm  view on Meta::CPAN

package App::TestOnTap::OrderStrategy;

use strict;
use warnings;

our $VERSION = '1.001';
my $version = $VERSION;
$VERSION = eval $VERSION;

use List::Util qw(shuffle);
use Sort::Naturally qw(nsort);

# CTOR
#
sub new
{
	my $class = shift;
	my $strategy = shift || 'none';

	die("Unknown order strategy: $strategy\n") unless $strategy =~ /^(?:none|(r?)(?:alphabetic|natural)|random)$/i;