Re: Create, Merge and work with tables in MS WOrd Documents Win32::Ole

2012-04-12 Thread timothy adigun
Hello, Please check Win32::Word::Writer http://search.cpan.org/~johanl/Win32-Word-Writer-0.03/lib/Win32/Word/Writer.pm and http://search.cpan.org/~johanl/Win32-Word-Writer-0.03/lib/Win32/Word/Writer/Table.pm . I think these should help. On Thu, Apr 12, 2012 at 11:44 PM, Raito Garcia wrote:

Re: How Can I find all kinds of methods a Object support?

2012-04-12 Thread Peter Scott
On Wed, 11 Apr 2012 16:12:22 +0800, Zapp wrote: > How Can I find all kinds of methods a Object support? For example: > > my $fh = IO::File->new("/path/to/file"); > > how manny kinds of methods does the $fh have ? > > I try perldoc IO::File , but didn't find what I want. I suspect that what you

Re: Create, Merge and work with tables in MS WOrd Documents Win32::Ole

2012-04-12 Thread Somu
Hello Raito! You could also use Pod::Webserver. Please check this link: http://search.cpan.org/~arandal/Pod-Webserver-3.05/lib/Pod/Webserver.pm. Install the module Pod::Webserver, then issue a command 'podwebserver' on your CLI . Then from your browser will be able to check all the module instal

Create, Merge and work with tables in MS WOrd Documents Win32::Ole

2012-04-12 Thread Raito Garcia
Hi... I have this code use Win32::OLE; my ($t_row, $t_col) = (4,3); my $word = Win32::OLE->CreateObject("Word.Application"); $word->{Visible} = 1; my $doc = $word->Documents->Add; my $table = $doc->Tables->Add($word->Selection->Range,$t_row, $t_col); $table->Select(); $table->AutoFormat(4,1,1,0,1

Re: Question on the function - hex

2012-04-12 Thread Uri Guttman
On 04/12/2012 04:43 PM, Shawn H Corey wrote: On 12-04-12 04:34 PM, Parag Kalra wrote: Why does the output of perl -e "print hex '0x160402'" differs from the output of perl -e "print hex 0x160402" EG: bash-3.2$ perl -e "print hex '0x160402'" 94489281538 $ perl -e "print

Re: Question on the function - hex

2012-04-12 Thread Shawn H Corey
On 12-04-12 04:34 PM, Parag Kalra wrote: Why does the output of perl -e "print hex '0x160402'" differs from the output of perl -e "print hex 0x160402" EG: bash-3.2$ perl -e "print hex '0x160402'" 94489281538 $ perl -e "print hex 0x160402" 10189963531576 $ per

Question on the function - hex

2012-04-12 Thread Parag Kalra
Why does the output of perl -e "print hex '0x160402'" differs from the output of perl -e "print hex 0x160402" EG: bash-3.2$ perl -e "print hex '0x160402'" 94489281538 $ perl -e "print hex 0x160402" 10189963531576

Re: Array of Hashes

2012-04-12 Thread John W. Krahn
Rob Dixon wrote: Hi Paul and welcome to the list. I can see a few things wrong with your code, but I have only a Windows machine so cannot test any changes I am suggestion so please beware. The reason you get the marked line in your output is because that is what you have written. This loop o

Re: Array of Hashes

2012-04-12 Thread Rob Dixon
On 12/04/2012 12:48, Paul.G wrote: Hi All New to this group, so hello to everybody. I am currently working on creating a Array of Hashes, note it is a work in progress. I appear to be getting some corruption when inputting data with the pvdisplay, I can't see why this is the case. I have put so

Re: Array of Hashes - problem solved

2012-04-12 Thread Paul.G
Hi All I have solved the problem, I would be interested in any comments however on this script. Positive and negative comments are welcome. #!/usr/bin/perl use strict; use warnings; my @vggroup; my @PV; my $PV=0; my $Extents; my $AllocatedPE; my $rec = {}; my $href; my $extent; open(CMD,"/u

Re: How Can I find all kinds of methods a Object support?

2012-04-12 Thread Michael Rasmussen
On Thu, Apr 12, 2012 at 06:29:09PM +0800, Zapp wrote: > I had try it, codes is here: > > #!/usr/local/bin/perl -w > > use Class::Inspector; > use IO::File; > > my @methods = Class::Inspector->methods('IO::File', 'full', 'public'); > > print "@methods"; > > but it Only print this: ARRAY(0xaa4bc8) >

Re: How Can I find all kinds of methods a Object support?

2012-04-12 Thread Shlomi Fish
Hi Zapp, On Thu, 12 Apr 2012 18:29:09 +0800 Zapp wrote: > I had try it, codes is here: > > #!/usr/local/bin/perl -w > > use Class::Inspector; > use IO::File; > > my @methods = Class::Inspector->methods('IO::File', 'full', 'public'); > > print "@methods"; > > but it Only print this: ARRAY(0x

Array of Hashes

2012-04-12 Thread Paul.G
Hi All New to this group, so hello to everybody. I am currently working on creating a Array of Hashes, note it is a work in progress. I appear to be getting some corruption when inputting data with the pvdisplay, I can't see why this is the case. I have put some print statements to see where I

Re: How Can I find all kinds of methods a Object support?

2012-04-12 Thread Zapp
I had try it, codes is here: #!/usr/local/bin/perl -w use Class::Inspector; use IO::File; my @methods = Class::Inspector->methods('IO::File', 'full', 'public'); print "@methods"; but it Only print this: ARRAY(0xaa4bc8) Why? 于 2012-4-11 20:34, Shlomi Fish 写道: Hi Zapp, On Wed, 11 Apr 2012 16

Re: error message "Use of uninitialized value in concatenation (.) or string at

2012-04-12 Thread Shlomi Fish
Hello adit, On Wed, 11 Apr 2012 20:03:28 -0700 (PDT) adit edogawa wrote: > hi, > please help me ... > I have a perl script as follows: > > #! / Usr / bin / perl-w > # Use module > use strict; > use DBI; > Seems like your E-mail user-agent has seriously mangled your Perl code thinking it is fr

Re: WWW::Selenium click not working

2012-04-12 Thread cvega
On Thursday, April 5, 2012 4:21:44 AM UTC-7, Gary Stainburn wrote: > Hi folks. > > Returning to Perl on Win32 for the first time in ages. Installed Strawberry > Perl and WWW::Selenium. However, when I run the example in the CPAN help > page, it hangs because the $sel->click doesn't work. > > I

error message "Use of uninitialized value in concatenation (.) or string at

2012-04-12 Thread adit edogawa
hi, please help me ... I have a perl script as follows: #! / Usr / bin / perl-w # Use module use strict; use DBI; # The variable declaration my $ dbh_lina; my $ dbh_sales; my $ sql_psb; my $ ext_psb; my $ total_row; my $ rs_data; my $ sql_rep; my $ ext_rep; # Connect to DB