Assert-Conditional
view release on metacpan or search on metacpan
t/asserts.t view on Meta::CPAN
q{assert_blank("\x{2005}")},
q{assert_blank("\x{2006}")},
q{assert_blank("\x{2007}")},
q{assert_blank("\x{2008}")},
q{assert_blank("\x{2009}")},
q{assert_blank("\x{200A}")},
q{assert_blank("\x{2028}")},
q{assert_blank("\x{2029}")},
q{assert_blank("\x{202F}")},
q{assert_blank("\x{205F}")},
q{assert_blank("\x{3000}")},
q{assert_nonblank($one)},
q{assert_single_line(4)},
q{assert_single_line($string)},
q{assert_single_line("abc\x{000A}")},
q{assert_single_line("abc\x{000B}")},
q{assert_single_line("abc\x{000C}")},
q{assert_single_line("abc\x{000D}")},
q{assert_single_line("abc\x{0085}")},
q{assert_single_line("abc\x{2028}")},
q{assert_single_line("abc\x{2029}")},
q{assert_single_paragraph("abc\x{000A}")},
q{assert_single_paragraph("abc\x{000B}")},
q{assert_single_paragraph("abc\x{000C}")},
q{assert_single_paragraph("abc\x{000D}")},
q{assert_single_paragraph("abc\x{0085}")},
q{assert_single_paragraph("abc\x{2028}")},
q{assert_single_paragraph("abc\x{2029}")},
q{assert_multi_line("one\ntwo\n")},
q{assert_multi_line("one\rtwo\n")},
q{assert_multi_line("one\rtwo\f")},
q{assert_multi_line("abc\x{000A} ")},
q{assert_multi_line("abc\x{000B} ")},
q{assert_multi_line("abc\x{000C} ")},
q{assert_multi_line("abc\x{000D} ")},
q{assert_multi_line("abc\x{0085} ")},
q{assert_multi_line("abc\x{2028} ")},
q{assert_multi_line("abc\x{2029} ")},
q{assert_single_paragraph("one")},
q{assert_single_paragraph("one\f")},
q{assert_single_paragraph("one\r\n")},
q{assert_single_paragraph("one\n\n\f")},
q{assert_bytes("abc")},
q{assert_bytes("\xA0")},
q{assert_nonbytes("\x{223}")},
q{assert_wide_characters("\x{223}")},
q{assert_nonascii("\x{223}")},
q{assert_ascii("zzz")},
q{assert_alphabetic("ni\N{LATIN SMALL LETTER N WITH TILDE}o")},
q{assert_nonalphabetic("~!")},
q{assert_alnum("abc39sd")},
q{assert_digits("12349120")},
q{assert_uppercased("THIS OLD MAN!")},
q{assert_lowercased("this old man!")},
q{assert_unicode_ident("ni\N{LATIN SMALL LETTER N WITH TILDE}o")},
q{assert_simple_perl_ident("ni\N{LATIN SMALL LETTER N WITH TILDE}o")},
q{assert_full_perl_ident("ni\N{LATIN SMALL LETTER N WITH TILDE}o")},
q{assert_qualified_ident("main::ni\N{LATIN SMALL LETTER N WITH TILDE}o")},
q{assert_ascii_ident("nino")},
q{assert_regex(qr/foo/)},
q{assert_like("foo", qr/f/)},
q{assert_unlike("foo", qr/z/)},
q{assert_latin1("ni\N{LATIN SMALL LETTER N WITH TILDE}o")},
q{assert_latinish("Henry \N{ROMAN NUMERAL EIGHT}")},
q{assert_astral("\x{012345}")},
q{assert_nonastral("fred")},
q{assert_bmp("ni\x{223}o")},
q{assert_nfc("ni\N{LATIN SMALL LETTER N WITH TILDE}o")},
q{assert_nfd("nin\x{303}o")},
q{assert_nfkc("ni\N{LATIN SMALL LETTER N WITH TILDE}o")},
q{assert_nfkd("nin\x{303}o")},
q{assert_eq("ni\N{LATIN SMALL LETTER N WITH TILDE}o", "nin\x{303}o")},
q{assert_eq_letters("----one, two", "ONE, TWO")},
q{assert_eq_letters("one, two", "ONE, TWO")},
q{assert_eq_letters("one, two", "ONE TWO")},
q{assert_eq_letters("one two", "ONE TWO")},
q{assert_eq_letters("one two", "ONE, TWO")},
q{assert_in_list("red", qw(one fish two fish red fish blue fish))},
q{assert_in_list(5, 1 .. 10)},
q{assert_in_list(5, 1, 3, undef, [], 5, 10)},
q{assert_in_list(\@ARGV, 1, 3, undef, \@ARGV, 5, 10)},
q{assert_in_list(undef, 1 .. 10, undef)},
q{assert_in_list(undef, undef)},
q{assert_not_in_list("red", qw(one fish two fish fish blue fish))},
q{assert_not_in_list(5, 6 .. 10)},
q{assert_not_in_list(1, 20 .. 30)},
q{assert_not_in_list(5, 1, 3, undef, [], 10)},
q{assert_not_in_list(undef, 1 .. 10)},
q{assert_not_in_list(undef)},
q{assert_list_nonempty( 1..10 )},
q{assert_array_nonempty( @stuff )},
q{assert_arrayref_nonempty( \@stuff )},
q{assert_arrayref_nonempty( [1..5] )},
q{assert_array_length(@ten)},
q{assert_array_length(@ten, 10)},
q{assert_array_length_min(@ten, 5)},
q{assert_array_length_max(@ten, 10)},
q{assert_array_length_minmax(@ten, 5, 20)},
q{ no warnings 'redefine'; sub fn0 { assert_argc_min(5) } fn0(localtime()) },
q{ no warnings 'redefine'; sub fn1($) { assert_argc(1) } fn1(localtime()) },
q{ no warnings 'redefine'; sub fn2 { assert_argc(3) } fn2(1, 2, 3) },
q{ no warnings 'redefine'; sub fn2 { assert_argc } fn2(1, 2, 3) },
q{ no warnings 'redefine'; sub fn2 { assert_argc_max(3) } fn2(1, 2, 3) },
q{ no warnings 'redefine'; sub fn2 { assert_argc_max(5) } fn2(1, 2, 3) },
q{ no warnings 'redefine'; sub fn2 { assert_argc_minmax(1,5) } fn2(1, 2, 3) },
q{assert_hash_nonempty(%primary_color)},
t/asserts.t view on Meta::CPAN
q{assert_hashref_keys()},
q{assert_hashref_nonempty()},
q{assert_hex_number()},
q{assert_in_list()},
q{assert_in_numeric_range()},
q{assert_integer()},
q{assert_ioref()},
q{assert_is()},
q{assert_isa()},
q{assert_isnt()},
q{assert_known_package()},
q{assert_latin1()},
q{assert_latinish()},
q{assert_like()},
q{assert_list_nonempty()},
q{assert_lowercased()},
q{assert_multi_line()},
q{assert_natural_number()},
q{assert_negative()},
q{assert_negative_integer()},
q{assert_nfc()},
q{assert_nfd()},
q{assert_nfkc()},
q{assert_nfkd()},
q{assert_nonalphabetic()},
q{assert_nonascii()},
q{assert_nonastral()},
q{assert_nonblank()},
q{assert_nonblank(" ")},
q{assert_nonbytes()},
q{assert_nonempty()},
q{assert_nonnegative()},
q{assert_nonnegative_integer()},
q{assert_nonnumeric()},
q{assert_nonobject()},
q{assert_nonpositive()},
q{assert_nonpositive_integer()},
q{assert_nonref()},
q{assert_nonzero()},
q{assert_not_in_list()},
q{assert_numeric()},
q{assert_object()},
q{assert_odd_number()},
q{assert_open_handle()},
q{assert_positive()},
q{assert_positive_integer()},
q{assert_qualified_ident()},
q{assert_reftype()},
q{assert_regex()},
q{assert_regular_file()},
q{assert_scalarref()},
q{assert_signed_number()},
q{assert_signed_number(42)},
q{assert_simple_perl_ident()},
q{assert_single_line()},
q{assert_single_paragraph()},
q{assert_text_file()},
q{assert_true()},
q{assert_undefined()},
q{assert_unhappy_code()},
q{assert_unicode_ident()},
q{assert_unlike()},
q{assert_uppercased()},
q{assert_whole_number()},
q{assert_wide_characters()},
q{assert_zero()},
q{assert_is($one, $two)},
q{assert_is($one, $undef)},
q{assert_defined(undef) },
q{assert_defined($undef) },
q{assert_defined_value(undef) },
q{assert_defined_variable($undef) },
q{assert_undefined(1) },
q{assert_defined_variable(!1) },
q{assert_undefined({}) },
q{assert_undefined_value({}) },
q{$junk = list_context() },
q{assert_defined($undef) },
q{$junk = list_context() },
q{@junk = scalar_context() },
q{@junk = void_context() },
q{list_context(); 1 },
q{nonvoid_context(); 1 },
q{scalar_context(); 1 },
q{$junk = void_context() },
q{@junk = nonlist_context() },
q{assert_true(!1) },
q{assert_true(0) },
q{assert_true(1,1) },
q{assert_true(q()) },
q{assert_true(q(), 4) },
q{assert_true(undef) },
q{assert_true(undef, undef) },
q{assert_false('0 but true') },
q{assert_false(1) },
q{assert_false(1,1) },
q{assert_numeric($string)},
q{assert_nonnumeric(42)},
q{assert_nonnumeric($one)},
q{assert_nonnumeric($float)},
q{assert_nonnumeric($minus_two)},
q{assert_positive($minus_two)},
q{assert_positive($zero)},
q{assert_positive($zero,3)},
q{assert_negative($zero)},
q{assert_zero($string)},
q{assert_zero($one)},
q{assert_zero(4,$string)},
q{assert_zero(0,$string)},
q{assert_nonzero($string)},
q{assert_nonzero(0)},
q{assert_nonnegative($minus_two)},
q{assert_nonpositive($one)},
q{assert_integer($float)},
q{assert_whole_number($float)},
q{assert_whole_number($string)},
q{assert_whole_number(undef)},
q{assert_positive_integer($minus_two)},
q{assert_positive_integer($zero)},
q{assert_positive_integer($float)},
q{assert_positive_integer($undef)},
t/asserts.t view on Meta::CPAN
q{assert_odd_number(undef)},
q{assert_odd_number($undef)},
q{assert_odd_number($undef)},
q{assert_in_numeric_range(-5,1,10)},
q{assert_in_numeric_range(15,1,10)},
q{assert_in_numeric_range(5,8,10)},
q{assert_in_numeric_range(-5,10,1)},
q{assert_in_numeric_range(-5,$string,10)},
q{assert_in_numeric_range(1,5,1,10)},
q{assert_in_numeric_range($string)},
q{assert_empty($one)},
q{assert_empty(22)},
q{assert_empty(undef)},
q{assert_empty(1,2)},
q{assert_nonempty([])},
q{assert_nonempty()},
q{assert_nonempty(undef)},
q{assert_blank()},
q{assert_blank("\0")},
q{assert_blank($one)},
q{assert_blank(undef)},
q{assert_blank([])},
q{assert_single_line("abc\x{000A} ")},
q{assert_single_line("abc\x{000B} ")},
q{assert_single_line("abc\x{000C} ")},
q{assert_single_line("abc\x{000D} ")},
q{assert_single_line("abc\x{0085} ")},
q{assert_single_line("abc\x{2028} ")},
q{assert_single_line("abc\x{2029} ")},
q{assert_single_paragraph("abc\x{000A} ")},
q{assert_single_paragraph("abc\x{000B} ")},
q{assert_single_paragraph("abc\x{000C} ")},
q{assert_single_paragraph("abc\x{000D} ")},
q{assert_single_paragraph("abc\x{0085} ")},
q{assert_single_paragraph("abc\x{2028} ")},
q{assert_single_paragraph("abc\x{2029} ")},
q{assert_single_line("")},
q{assert_single_line(undef)},
q{assert_single_line("\n\n")},
q{assert_single_line("\r\n")},
q{assert_multi_line("")},
q{assert_multi_line("foo")},
q{assert_multi_line("foo\r\n")},
q{assert_multi_line(undef)},
q{assert_single_paragraph("one\f" x 5)},
q{assert_single_paragraph("one\r\n" x 5)},
q{assert_single_paragraph("one\n\n\f" x 5)},
q{assert_nonbytes("abc")},
q{assert_nonbytes("\xA0")},
q{assert_nbytes("\x{223}")},
q{assert_wide_characters("x")},
q{assert_nonascii("223")},
q{assert_ascii("\xa0")},
q{assert_nonalphabetic("ni\N{LATIN SMALL LETTER N WITH TILDE}o")},
q{assert_alphabetic("~!")},
q{assert_alnum("abc%39sd")},
q{assert_digits("1234asbc9120")},
q{assert_lowercased("THIS OLD MAN!")},
q{assert_uppercased("this old man!")},
q{assert_uppercased("BA\N{LATIN SMALL LETTER SHARP S}")},
q{assert_unicode_ident("_ni\N{LATIN SMALL LETTER N WITH TILDE}o")},
q{assert_simple_perl_ident("ni\xa2o")},
q{assert_full_perl_ident("ni\xa2o")},
q{assert_qualified_ident("main::ni\xa2o")},
q{assert_qualified_ident("main")},
q{assert_ascii_ident("ni\N{LATIN SMALL LETTER N WITH TILDE}o")},
q{assert_regex(q/foo/)},
q{assert_like("foo", q/f/)},
q{assert_like("foo", qr/z/)},
q{assert_unlike("foo", qr/f/)},
q{assert_latin1("\x{189}")},
q{assert_latin1("Henry \x{2167}")},
q{assert_latinish("\x{F0FF}")},
q{assert_astral("\x{F0FF}")},
q{assert_nonastral("\x{12345}")},
q{assert_bmp("ni\x{12223}o")},
q{assert_nfc("\x{212A}")}, # Singleton
q{assert_nfd("\x{212A}")},
q{assert_nfkc("\x{212A}")},
q{assert_nfkd("\x{212A}")},
q{assert_nfd("ni\N{LATIN SMALL LETTER N WITH TILDE}o")},
q{assert_nfc("nin\x{303}o")},
q{assert_nfkc("\x{a0}")},
q{assert_nfkd("\x{a0}")},
q{assert_nfkd("\x{bc}")},
q{assert_eq("ni\N{LATIN SMALL LETTER N WITH TILDE}o", "nin\x{304}o")},
q{assert_eq_letters("one, tow", "ONE")},
q{assert_isnt($one, $one)},
q{assert_isnt($bignum, $bignum)},
q{assert_isnt($tied_object, $tied_object)},
q{ no warnings 'redefine'; sub fn0 { assert_argc_min(15) } fn0(localtime()) },
q{ no warnings 'redefine'; sub fn1($) { assert_argc(0) } fn1(localtime()) },
q{ no warnings 'redefine'; sub fn2 { assert_argc(2) } fn2(1, 2, 3) },
q{ no warnings 'redefine'; sub fn2 { assert_argc } fn2() },
q{ no warnings 'redefine'; sub fn2 { assert_argc_max(2) } fn2(1, 2, 3) },
q{ no warnings 'redefine'; sub fn2 { assert_argc_max(2) } fn2(1, 2, 3) },
q{ no warnings 'redefine'; sub fn2 { assert_argc_minmax(10,25) }fn2(1, 2, 3) },
q{ no warnings 'redefine'; sub fn2 { assert_argc_minmax(2,1) }fn2(1, 2, 3) },
q{ no warnings 'redefine'; sub fn2 { assert_argc_minmax(25,10) }fn2(1, 2, 3) },
q{ no warnings 'redefine'; sub fn2 { assert_argc_minmax(1,2) }fn2(1, 2, 3) },
q{assert_in_list("red", qw(one fish two fish fish blue fish))},
q{assert_in_list(5, 6 .. 10)},
q{assert_in_list(1, 20 .. 30)},
q{assert_in_list(5, 1, 3, undef, [], 10)},
q{assert_in_list(undef, 1 .. 10)},
q{assert_in_list(undef)},
q{assert_not_in_list("red", qw(one fish two fish red fish blue fish))},
q{assert_not_in_list(5, 1 .. 10)},
q{assert_not_in_list(5, 1, 3, undef, [], 5, 10)},
q{assert_not_in_list(\@ARGV, 1, 3, undef, \@ARGV, 5, 10)},
q{assert_not_in_list(undef, 1 .. 10, undef)},
q{assert_not_in_list(undef, undef)},
q{assert_list_nonempty( () )},
q{assert_array_nonempty( @some::thing )},
q{assert_arrayref_nonempty( \@some::thing )},
q{assert_arrayref_nonempty( [ ] )},
( run in 0.483 second using v1.01-cache-2.11-cpan-39bf76dae61 )