Login or Register to Ask a Question and Join Our Community


Shell Programming and Scripting

method bless perl

Login to Discuss or Reply to this Discussion in Our Community

 
Thread Tools Search this Thread
Top Forums Shell Programming and Scripting method bless perl
# 1  
Old 02-08-2011
Question method bless perl
Hi,
I am using perl with some EDA tool. There is an API function that can be iterate.
I try to check the ref and get that it is a string. I assume that it is a hash

sub aaa {
my $obj = shift;
$name = $obj->name;
print ref $obj,"\n";
foreach my $var(keys %{$obj}) {
my $val = %{$obj}->{$var};
print "$var = $val\n";
}
}

I get
spy
PTR = 184267833624
TYPE = 2
I guess that name is a methods. How can I know it's content ?
Regards,
Ziv
Login or Register to Ask a Question

Previous Thread | Next Thread

9 More Discussions You Might Find Interesting

1. Emergency UNIX and Linux Support

Perl error: Can't call method "value" on an undefined value

Hi, I am running a perl script to automate a process and I keep running into a error can't find the "value" Can't call method "value" on an undefined value at process_file.pl line 44. file is CVS cell is ifdfdxrfmp.ksh Here is the script I have also attached it as well: ... (2 Replies)
Discussion started by: vpundit
2 Replies

2. Solaris

svc:/network/physical:default: Method "/lib/svc/method/net-physical" failed with exit status 96. [ n

After a memory upgrade all network interfaces are misconfigued. How do i resolve this issue. Below are some out puts.thanks. ifconfig: plumb: SIOCLIFADDIF: eg000g0:2: no such interface # ifconfig eg1000g0:2 plumb ifconfig: plumb: SIOCLIFADDIF: eg1000g0:2: no such interface # ifconfig... (2 Replies)
Discussion started by: andersonedouard
2 Replies

3. Programming

message and method

Differentiate between the message and method. (2 Replies)
Discussion started by: robinglow
2 Replies

4. Shell Programming and Scripting

Method isSuccess not working right perl

Good morning all.... I have been learning Perl for about 2 months now and I guess I am getting there as much as I can however I am really stuck. I have a Perl script called postEvent.pl which uses a package called event.pm. PostEvent.pl depends on a meithod inside event.pm called isSuccess to... (0 Replies)
Discussion started by: LRoberts
0 Replies

5. Shell Programming and Scripting

Is a Perl method defined?

In my code, I know I can write... if ( defined &test_sub ) { test_sub(); } else { print "Subroutine doesn't exist"; } This tests the existence of the test_sub subroutine without actually calling it. If, though, I replace test_sub with a package method... if ( defined... (1 Reply)
Discussion started by: JerryHone
1 Replies

6. UNIX for Dummies Questions & Answers

perl bless function

hi i am not getting what exactly bless function do in perl explanation in perldoc is not very clear i tried to search on google but i am getting confused or rather not getting at all. can anybody explain in short what it does in following example as well as in general ? sub new { my... (1 Reply)
Discussion started by: zedex
1 Replies

7. Infrastructure Monitoring

diffrence between method call and function call in perl

Hello, I have a problem with package and name space. require "/Mehran/DSGateEngineLib/general.pl"; use strict; sub System_Status_Main_Service_Status_Intrusion_Prevention { my %idpstatus; my @result; &General_ReadHash("/var/dsg/idp/settings",\%idpstatus); #print... (4 Replies)
Discussion started by: Zaxon
4 Replies

8. Programming

Best Method for installing Perl Modules

Which is the perferred method of installing Perl modules on a Unix system? Is is CPAN or manually installing them via a tar file? Also can anyone point me in the right direction to a decent "how to" on configuring CPAN and how to perform custom installs from a tar? thanks:b: (2 Replies)
Discussion started by: metallica1973
2 Replies

9. Shell Programming and Scripting

Perl, FilePropStore Method

Guys, anyone familiar with this FileProp Store Method.. Im having Compilation Error whenever a value is stored into the tied hash. Run time error sub STORE { my ($self, $key, $value) = @_; my $name = $self ->{name}; unless ($PROPS{$key} and -w $name){ croak "Can't... (1 Reply)
Discussion started by: killerserv
1 Replies
Login or Register to Ask a Question

LEARN ABOUT DEBIAN

moosex::attribute::chainedclone

MooseX::Attribute::ChainedClone(3pm)			User Contributed Perl Documentation		      MooseX::Attribute::ChainedClone(3pm)

NAME

       MooseX::Attribute::ChainedClone - Attribute that returns a cloned instance

VERSION

       version 1.0.1

SYNOPSIS

	 package Test;
	 use Moose;

	 has debug => (
	     traits => [ 'ChainedClone' ],
	     is => 'rw',
	     isa => 'Bool',
	     default => 0,
	 );

	 sub complex_method
	 {
	     my $self = shift;

	     #...

	     print "helper message" if $self->debug;

	     #...
	 }

	 sub clone {
	     my $self = shift;
	     # custom clone code here
	     # defaults to:
	     return bless { %$self }, ref $self;
	 }

	 1;

       Which allows for:

	   my $test = Test->new;
	   $test->debug(1)->complex_method; # debug enabled
					    # complex_method is called on a cloned instance
					    # with debug set to 1

	   $test->complex_method;	    # debug is still disabled on $test

	   $test->debug(1); # returns a cloned $test instance with debug set to 1
	   $test->debug;    # returns 0

DESCRIPTION

       MooseX::Attribute::ChainedClone is a Moose Trait which allows for method chaining on accessors by returning a cloned instance of $self on
       write/set operations.

       If $self has a "clone" method, this method is invoked to clone the instance.  This allows for easy integration with MooseX::Clone or any
       custom made clone method. If no "clone" method is available, the new instance is build using "bless { %$self }, ref $self".

AUTHORS

       o   Moritz Onken <onken@netcubed.de>

       o   David McLaughlin <david@dmclaughlin.com>

COPYRIGHT AND LICENSE

       This software is copyright (c) 2012 by Moritz Onken.

       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-01-28				      MooseX::Attribute::ChainedClone(3pm)