moose::meta::attribute::native::trait::code(3) [osx man page]
Moose::Meta::Attribute::Native::Trait::Code(3) User Contributed Perl Documentation Moose::Meta::Attribute::Native::Trait::Code(3)NAME
Moose::Meta::Attribute::Native::Trait::Code - Helper trait for CodeRef attributes
VERSION
version 2.0604
SYNOPSIS
package Foo;
use Moose;
has 'callback' => (
traits => ['Code'],
is => 'ro',
isa => 'CodeRef',
default => sub {
sub { print "called" }
},
handles => {
call => 'execute',
},
);
my $foo = Foo->new;
$foo->call; # prints "called"
DESCRIPTION
This trait provides native delegation methods for code references.
DEFAULT TYPE
If you don't provide an "isa" value for your attribute, it will default to "CodeRef".
PROVIDED METHODS
o execute(@args)
Calls the coderef with the given args.
o execute_method(@args)
Calls the coderef with the the instance as invocant and given args.
BUGS
See "BUGS" in Moose for details on reporting bugs.
AUTHOR
Moose is maintained by the Moose Cabal, along with the help of many contributors. See "CABAL" in Moose and "CONTRIBUTORS" in Moose for
details.
COPYRIGHT AND LICENSE
This software is copyright (c) 2012 by Infinity Interactive, Inc..
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.
perl v5.16.2 2012-09-19 Moose::Meta::Attribute::Native::Trait::Code(3)
Check Out this Related Man Page
Moose::Meta::Attribute::Native::Trait::Code(3pm) User Contributed Perl Documentation Moose::Meta::Attribute::Native::Trait::Code(3pm)NAME
Moose::Meta::Attribute::Native::Trait::Code - Helper trait for CodeRef attributes
VERSION
version 2.0603
SYNOPSIS
package Foo;
use Moose;
has 'callback' => (
traits => ['Code'],
is => 'ro',
isa => 'CodeRef',
default => sub {
sub { print "called" }
},
handles => {
call => 'execute',
},
);
my $foo = Foo->new;
$foo->call; # prints "called"
DESCRIPTION
This trait provides native delegation methods for code references.
DEFAULT TYPE
If you don't provide an "isa" value for your attribute, it will default to "CodeRef".
PROVIDED METHODS
o execute(@args)
Calls the coderef with the given args.
o execute_method(@args)
Calls the coderef with the the instance as invocant and given args.
BUGS
See "BUGS" in Moose for details on reporting bugs.
AUTHOR
Moose is maintained by the Moose Cabal, along with the help of many contributors. See "CABAL" in Moose and "CONTRIBUTORS" in Moose for
details.
COPYRIGHT AND LICENSE
This software is copyright (c) 2012 by Infinity Interactive, Inc..
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.
perl v5.14.2 2012-06-28 Moose::Meta::Attribute::Native::Trait::Code(3pm)
hi all
i have a unix machine (FBD). I have Also installed java of Version (j2sdk1.4.1_07) on unix machine. Now i
want to Call C Native function in Java Which is declared as Native. i am doing this by following steps:
1) Making Echo.java File Which is having The following lines of code.... (5 Replies)
ps -eo pid,ppid,uid,user,args
If i use above command on any of my sol boxes,i see that fifth column (args or COMMAND) is truncated.
Is there a way of getting full details in this column ,like we have in AIX?
Regards
Abhi (13 Replies)
Hello All,
I have some expression:
if (/^(\d\d\d\d\d\.\d\d\d\d\d\d)\s+(.+)$/)
{
warn "$argv0(" . __LINE__ . "): rbl2ts{$2} == '$rbl2ts{$2}' \$1==$1\n" if ($debug);
$rbl2ts{$2} = $1 if (!defined($rbl2ts{$2}) or ($1 le $rbl2ts{$2}));
warn "$argv0(" . __LINE__ . "):... (3 Replies)
Hi Gurus,
Can anyone explain me what is a Vlan and a Native vlan. How to check the native Vlan on my server having a solaris10 OS.
Thanks in advance.:) (2 Replies)
I'm just trying to confirm that I understand someone's code correctly.
If someone has code that says:
$foo ||= mysub();
I'm assuming that it means if $foo is nothing or undef, then assign it some value via mysub(). If I'm wrong on this, please let me know.
Also, what's the difference... (4 Replies)
Hi All
Can any one please help me to understand the below Perl Code
package Win32::File;
#
# File.pm
# Written by Douglas_Lankshear@ActiveWare.com
#
# subsequent hacks:
# Gurusamy Sarathy
#
$VERSION = '0.06';
require Exporter;
require DynaLoader;
@ISA= qw( Exporter... (1 Reply)
Dears,
I want to print filename and count of each file in perl but failing to implement.
`find $srcFolder -maxdepth 1 -type f -name "*$workDate*$fileExt" -exec sh -c ' && printf "$workDate|%s|%s\n" "$(wc -l<"$0")" *$workDate*$fileExt' {} \ >> /Sadique/filelog.out \\; 2> /dev/null`;
... (2 Replies)