| /dports/devel/p5-Contextual-Return/Contextual-Return-0.004014/t/ |
| H A D | blessed.t | 24 use Scalar::Util 'blessed';
44 is blessed( ::blessed_obj ()), 'Blessed' => 'blessed obj ';
45 is blessed( ::blessed_OBJREF ()), 'Blessed' => 'blessed OBJREF ';
46 is blessed( ::blessed_REF ()), 'Blessed' => 'blessed REF ';
47 is blessed( ::blessed_SCALAR ()), 'Blessed' => 'blessed SCALAR ';
48 is blessed( ::blessed_VALUE ()), 'Blessed' => 'blessed VALUE ';
49 is blessed( ::blessed_NONVOID()), 'Blessed' => 'blessed NONVOID';
50 is blessed( ::blessed_DEFAULT()), 'Blessed' => 'blessed DEFAULT';
51 is blessed( ::blessed_BLESSED()), 'EXPLICITLY_BLESSED' => 'blessed BLESSED';
53 is blessed(::unblessed_obj ()), undef() => 'unblessed obj ';
[all …]
|
| /dports/lang/perl5.34/perl-5.34.0/cpan/Scalar-List-Utils/t/ |
| H A D | blessed.t | 7 use Scalar::Util qw(blessed);
11 ok(!defined blessed(undef), 'undef is not blessed');
12 ok(!defined blessed(1), 'Numbers are not blessed');
14 ok(!defined blessed({}), 'Unblessed HASH-ref');
15 ok(!defined blessed([]), 'Unblessed ARRAY-ref');
16 ok(!defined blessed(\$t), 'Unblessed SCALAR-ref');
21 is(blessed($x), "ABC", 'blessed ARRAY-ref');
24 is(blessed($x), "DEF", 'blessed HASH-ref');
27 cmp_ok(blessed($x), "eq", "0", 'blessed HASH-ref');
30 my $blessed = do {
[all …]
|
| /dports/lang/perl5.32/perl-5.32.1/cpan/Scalar-List-Utils/t/ |
| H A D | blessed.t | 7 use Scalar::Util qw(blessed);
11 ok(!defined blessed(undef), 'undef is not blessed');
12 ok(!defined blessed(1), 'Numbers are not blessed');
14 ok(!defined blessed({}), 'Unblessed HASH-ref');
15 ok(!defined blessed([]), 'Unblessed ARRAY-ref');
16 ok(!defined blessed(\$t), 'Unblessed SCALAR-ref');
21 is(blessed($x), "ABC", 'blessed ARRAY-ref');
24 is(blessed($x), "DEF", 'blessed HASH-ref');
27 cmp_ok(blessed($x), "eq", "0", 'blessed HASH-ref');
30 my $blessed = do {
[all …]
|
| /dports/lang/p5-Scalar-List-Utils/Scalar-List-Utils-1.60/t/ |
| H A D | blessed.t | 7 use Scalar::Util qw(blessed);
11 ok(!defined blessed(undef), 'undef is not blessed');
12 ok(!defined blessed(1), 'Numbers are not blessed');
14 ok(!defined blessed({}), 'Unblessed HASH-ref');
15 ok(!defined blessed([]), 'Unblessed ARRAY-ref');
16 ok(!defined blessed(\$t), 'Unblessed SCALAR-ref');
21 is(blessed($x), "ABC", 'blessed ARRAY-ref');
24 is(blessed($x), "DEF", 'blessed HASH-ref');
27 cmp_ok(blessed($x), "eq", "0", 'blessed HASH-ref');
30 my $blessed = do {
[all …]
|
| /dports/lang/perl5-devel/perl5-5.35.4-102-ge43d289c7c/cpan/Scalar-List-Utils/t/ |
| H A D | blessed.t | 7 use Scalar::Util qw(blessed);
11 ok(!defined blessed(undef), 'undef is not blessed');
12 ok(!defined blessed(1), 'Numbers are not blessed');
14 ok(!defined blessed({}), 'Unblessed HASH-ref');
15 ok(!defined blessed([]), 'Unblessed ARRAY-ref');
16 ok(!defined blessed(\$t), 'Unblessed SCALAR-ref');
21 is(blessed($x), "ABC", 'blessed ARRAY-ref');
24 is(blessed($x), "DEF", 'blessed HASH-ref');
27 cmp_ok(blessed($x), "eq", "0", 'blessed HASH-ref');
30 my $blessed = do {
[all …]
|
| /dports/lang/perl5.30/perl-5.30.3/cpan/Scalar-List-Utils/t/ |
| H A D | blessed.t | 7 use Scalar::Util qw(blessed);
11 ok(!defined blessed(undef), 'undef is not blessed');
12 ok(!defined blessed(1), 'Numbers are not blessed');
13 ok(!defined blessed('A'), 'Strings are not blessed');
14 ok(!defined blessed({}), 'Unblessed HASH-ref');
15 ok(!defined blessed([]), 'Unblessed ARRAY-ref');
16 ok(!defined blessed(\$t), 'Unblessed SCALAR-ref');
21 is(blessed($x), "ABC", 'blessed ARRAY-ref');
24 is(blessed($x), "DEF", 'blessed HASH-ref');
30 my $blessed = do {
[all …]
|
| /dports/multimedia/zoneminder/zoneminder-1.36.5/onvif/proxy/lib/ONVIF/Media/Interfaces/Media/ |
| H A D | MediaPort.pm | 47 die "GetVideoSources must be called as object method (\$self is <$self>)" if not blessed($self);
72 die "GetAudioSources must be called as object method (\$self is <$self>)" if not blessed($self);
96 die "GetAudioOutputs must be called as object method (\$self is <$self>)" if not blessed($self);
120 die "CreateProfile must be called as object method (\$self is <$self>)" if not blessed($self);
145 die "GetProfile must be called as object method (\$self is <$self>)" if not blessed($self);
165 die "GetProfiles must be called as object method (\$self is <$self>)" if not blessed($self);
1825 die "GetOSDs must be called as object method (\$self is <$self>)" if not blessed($self);
1850 die "GetOSD must be called as object method (\$self is <$self>)" if not blessed($self);
1900 die "SetOSD must be called as object method (\$self is <$self>)" if not blessed($self);
1925 die "CreateOSD must be called as object method (\$self is <$self>)" if not blessed($self);
[all …]
|
| /dports/multimedia/zoneminder/zoneminder-1.36.5/onvif/proxy/lib/ONVIF/Device/Interfaces/Device/ |
| H A D | DevicePort.pm | 22 die "GetServices must be called as object method (\$self is <$self>)" if not blessed($self);
193 die "SystemReboot must be called as object method (\$self is <$self>)" if not blessed($self);
318 die "GetScopes must be called as object method (\$self is <$self>)" if not blessed($self);
343 die "SetScopes must be called as object method (\$self is <$self>)" if not blessed($self);
368 die "AddScopes must be called as object method (\$self is <$self>)" if not blessed($self);
618 die "GetUsers must be called as object method (\$self is <$self>)" if not blessed($self);
693 die "SetUser must be called as object method (\$self is <$self>)" if not blessed($self);
868 die "GetDNS must be called as object method (\$self is <$self>)" if not blessed($self);
893 die "SetDNS must be called as object method (\$self is <$self>)" if not blessed($self);
918 die "GetNTP must be called as object method (\$self is <$self>)" if not blessed($self);
[all …]
|
| /dports/devel/p5-MooseX-ConfigFromFile/MooseX-ConfigFromFile-0.14/t/ |
| H A D | 05_default_sub.t | 6 use Test::Deep '!blessed';
8 use Scalar::Util 'blessed';
33 my $class = blessed($_[0]) || $_[0];
45 $constructor_args{blessed($obj)},
75 my $class = blessed($_[0]) || $_[0];
90 $constructor_args{blessed($obj)},
157 $constructor_args{blessed($obj)},
226 $constructor_args{blessed($obj)},
268 $constructor_args{blessed($obj)},
294 $constructor_args{blessed($obj)},
[all …]
|
| /dports/devel/p5-Data-Perl/Data-Perl-0.002011/lib/Data/Perl/Role/Collection/ |
| H A D | Array.pm | 73 sub shallow_clone { blessed($_[0]) ? bless([@{$_[0]}], ref $_[0]) : [@{$_[0]}] }
87 blessed($self) ? blessed($self)->new(@res) : @res;
95 blessed($self) ? blessed($self)->new(@res) : @res;
103 blessed($self) ? blessed($self)->new(@res) : @res;
111 blessed($self) ? blessed($self)->new(@res) : @res;
124 blessed($self) ? blessed($self)->new(@res) : @res;
132 blessed($self) ? blessed($self)->new(@res) : @res;
140 blessed($self) ? blessed($self)->new(@res) : @res;
197 blessed($self) ? blessed($self)->new(@res) : @res;
209 blessed($self) ? blessed($self)->new(@res) : @res;
|
| /dports/math/p5-Math-Matrix/Math-Matrix-0.94/t/lib/Math/ |
| H A D | Real.pm | 28 $y = $class -> new($y) unless blessed($y) && $y -> isa($class);
35 $y = $class -> new($y) unless blessed($y) && $y -> isa($class);
43 $y = $class -> new($y) unless blessed($y) && $y -> isa($class);
50 $y = $class -> new($y) unless blessed($y) && $y -> isa($class);
58 $y = $class -> new($y) unless blessed($y) && $y -> isa($class);
66 $y = $class -> new($y) unless blessed($y) && $y -> isa($class);
74 $y = $class -> new($y) unless blessed($y) && $y -> isa($class);
82 $y = $class -> new($y) unless blessed($y) && $y -> isa($class);
92 $y = $class -> new($y) unless blessed($y) && $y -> isa($class);
100 $y = $class -> new($y) unless blessed($y) && $y -> isa($class);
[all …]
|
| /dports/devel/p5-Ref-Util/Ref-Util-0.204/lib/Ref/Util/ |
| H A D | PP.pm | 145 !defined Scalar::Util::blessed( $_[0] )
151 !defined Scalar::Util::blessed( $_[0] )
157 !defined Scalar::Util::blessed( $_[0] )
163 !defined Scalar::Util::blessed( $_[0] )
201 defined Scalar::Util::blessed( $_[0] )
208 defined Scalar::Util::blessed( $_[0] )
214 defined Scalar::Util::blessed( $_[0] )
220 defined Scalar::Util::blessed( $_[0] )
226 defined Scalar::Util::blessed( $_[0] )
236 defined Scalar::Util::blessed( $_[0] )
[all …]
|
| /dports/graphics/p5-GraphViz-Data-Structure/GraphViz-Data-Structure-0.20/dotty/ |
| H A D | 08object.data.in | 1 (name=>'blessed scalar (empty)',
7 (name=>'blessed scalar (scalar value)',
14 (name=>'blessed scalar (ref value)',
20 (name=>'blessed hash (empty)',
26 (name=>'blessed array (empty)',
50 (name=>'blessed vertical scalar (empty)',
57 (name=>'blessed vertical scalar (scalar value)',
64 (name=>'blessed vertical scalar (ref value)',
73 (name=>'blessed vertical hash (empty)',
79 (name=>'blessed vertical array (empty)',
[all …]
|
| /dports/devel/py-blessed/blessed-1.19.0/ |
| H A D | README.rst | 12 from blessed import Terminal
168 from blessed import Terminal
186 .. _`Terminal.length()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.termina…
187 .. _`Terminal.strip()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.terminal…
188 .. _`Terminal.rstrip()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.termina…
189 .. _`Terminal.lstrip()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.termina…
191 .. _`Terminal.wrap()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.terminal.…
193 .. _`Terminal.rjust()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.terminal…
194 .. _`Terminal.ljust()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.terminal…
196 .. _`Terminal.raw()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.terminal.T…
[all …]
|
| H A D | PKG-INFO | 2 Name: blessed
5 Home-page: https://github.com/jquast/blessed
21 from blessed import Terminal
177 from blessed import Terminal
195 ….. _`Terminal.length()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.termin…
196 ….. _`Terminal.strip()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.termina…
200 ….. _`Terminal.wrap()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.terminal…
202 ….. _`Terminal.rjust()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.termina…
203 ….. _`Terminal.ljust()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.termina…
205 ….. _`Terminal.raw()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.terminal.…
[all …]
|
| /dports/devel/py-blessed/blessed-1.19.0/docs/ |
| H A D | intro.rst | 12 from blessed import Terminal
168 from blessed import Terminal
186 .. _`Terminal.length()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.termina…
187 .. _`Terminal.strip()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.terminal…
188 .. _`Terminal.rstrip()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.termina…
189 .. _`Terminal.lstrip()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.termina…
191 .. _`Terminal.wrap()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.terminal.…
193 .. _`Terminal.rjust()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.terminal…
194 .. _`Terminal.ljust()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.terminal…
196 .. _`Terminal.raw()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.terminal.T…
[all …]
|
| /dports/multimedia/zoneminder/zoneminder-1.36.5/onvif/proxy/lib/ONVIF/PTZ/Interfaces/PTZ/ |
| H A D | PTZPort.pm | 47 … die "GetConfigurations must be called as object method (\$self is <$self>)" if not blessed($self);
72 die "GetPresets must be called as object method (\$self is <$self>)" if not blessed($self);
97 die "SetPreset must be called as object method (\$self is <$self>)" if not blessed($self);
122 die "RemovePreset must be called as object method (\$self is <$self>)" if not blessed($self);
147 die "GotoPreset must be called as object method (\$self is <$self>)" if not blessed($self);
172 die "GetStatus must be called as object method (\$self is <$self>)" if not blessed($self);
222 die "GetNodes must be called as object method (\$self is <$self>)" if not blessed($self);
247 die "GetNode must be called as object method (\$self is <$self>)" if not blessed($self);
397 die "RelativeMove must be called as object method (\$self is <$self>)" if not blessed($self);
447 die "AbsoluteMove must be called as object method (\$self is <$self>)" if not blessed($self);
[all …]
|
| /dports/devel/p5-namespace-autoclean/namespace-autoclean-0.29/t/ |
| H A D | except.t | 8 use Scalar::Util qw(blessed);
10 use namespace::autoclean -except => ['blessed'];
14 ok( Foo->can('blessed'), 'Foo has blessed sub - passed to -except as arrayref' );
18 use Scalar::Util qw(blessed);
20 use namespace::autoclean -except => 'blessed';
24 ok( Bar->can('blessed'), 'Bar has blessed sub - passed to -except as string' );
28 use Scalar::Util qw(blessed);
34 ok( Baz->can('blessed'), 'Baz has blessed sub - passed to -except as regex' );
|
| /dports/devel/py-blessed/blessed-1.19.0/tests/ |
| H A D | test_formatters.py | 124 from blessed.formatters import FormattingString
141 from blessed.formatters import FormattingString
190 from blessed.formatters import split_compound
279 import blessed
295 import blessed
301 monkeypatch.setattr(blessed.formatters,
316 import blessed
325 monkeypatch.setattr(blessed.formatters,
328 monkeypatch.setattr(blessed.formatters,
348 import blessed
[all …]
|
| /dports/devel/p5-Moose/Moose-2.2201/t/basics/ |
| H A D | import_unimport.t | 14 blessed confess
67 use Scalar::Util qw( blessed );
72 can_ok( 'Baz', 'blessed' );
77 use Scalar::Util qw( blessed );
83 can_ok( 'Moo', 'blessed' );
85 my $blessed;
89 use Scalar::Util qw( blessed );
90 use Moose blessed => { -as => \$blessed };
95 can_ok( 'Quux', 'blessed' );
96 is( $blessed, \&Scalar::Util::blessed );
|
| /dports/devel/py-blessed/blessed-1.19.0/blessed.egg-info/ |
| H A D | PKG-INFO | 2 Name: blessed
5 Home-page: https://github.com/jquast/blessed
21 from blessed import Terminal
177 from blessed import Terminal
195 ….. _`Terminal.length()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.termin…
196 ….. _`Terminal.strip()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.termina…
200 ….. _`Terminal.wrap()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.terminal…
202 ….. _`Terminal.rjust()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.termina…
203 ….. _`Terminal.ljust()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.termina…
205 ….. _`Terminal.raw()`: https://blessed.readthedocs.io/en/stable/api/terminal.html#blessed.terminal.…
[all …]
|
| /dports/devel/p5-Data-Dump-Streamer/Data-Dump-Streamer-2.40/t/ |
| H A D | blessed.t | 2 use Data::Dump::Streamer qw(blessed);
4 #$Id: blessed.t 26 2006-04-16 15:18:52Z demerphq $#
10 print "not " if blessed(1);
13 print "not " if blessed('A');
16 print "not " if blessed({});
19 print "not " if blessed([]);
24 print "not " if blessed($y);
29 print "not " unless blessed($x);
32 print "not " unless blessed($x) eq 'ABC';
|
| /dports/devel/p5-OOTools/OOTools-2.4/t/ |
| H A D | 14_blessed.t | 13 ; is blessed(bless {}, 'aclass'), 'aclass'
14 ; is blessed(undef), undef
15 ; is blessed(''), undef
16 ; is blessed('something'), undef
17 ; is blessed(\'something'), undef
18 ; is blessed({}), undef
21 ; is blessed, 'aclass'
|
| /dports/textproc/p5-RDF-Query/RDF-Query-2.918/lib/RDF/Query/Functions/ |
| H A D | Xpath.pm | 134 my $flags = blessed($f) ? $f->literal_value : '';
272 unless (blessed($node) and $node->isa('RDF::Query::Node::Literal')) {
296 if (blessed($node) and $node->isa('RDF::Query::Node::Literal')) {
311 if (blessed($node) and $node->isa('RDF::Query::Node::Literal')) {
326 if (blessed($node) and $node->isa('RDF::Query::Node::Literal')) {
341 if (blessed($node) and $node->isa('RDF::Query::Node::Literal')) {
357 unless (blessed($node) and $node->isa('RDF::Query::Node::Literal')) {
360 unless (blessed($pat) and $pat->isa('RDF::Query::Node::Literal')) {
381 unless (blessed($node) and $node->isa('RDF::Query::Node::Literal')) {
384 unless (blessed($pat) and $pat->isa('RDF::Query::Node::Literal')) {
[all …]
|
| /dports/devel/p5-Params-Classify/Params-Classify-0.015/lib/Params/ |
| H A D | Classify.pm | 206 $type = "BLESSED" if defined(blessed($_[0]));
395 defined($reftype) && !defined(blessed($_[0]));
411 defined($reftype) && !defined(blessed($_[0]));
454 return defined(blessed($_[0])) && (@_ != 2 || $_[0]->isa($_[1]));
475 *blessed_class = \&blessed;
499 my $blessed = blessed($_[0]);
500 return defined($blessed) && $blessed eq $_[1];
543 return 0 unless defined blessed $_[0];
553 unless(defined blessed $_[0]) {
|