hash issue

2013-04-17 Thread Irfan Sayed
hi, need help on hashes  here is the code : print Enter the words: ; chomp(my @words = STDIN); my %names; foreach $a (@words) { if (!%names) { print hi\n; $names{$a} = 1; } else { while ( ($key, $value) = each %names ) { if ($a eq $key) { $names{$key} += 1; } else { $names{$a} = 1; } } } }

delete blank lines from text file

2012-10-01 Thread Irfan Sayed
hi, i need to delete all blank lines from the text file wrote following code. however, all the blank lines are not getting deleted. please suggest open FILE,+, 'C:\Users\bvcontrolbuild\Desktop\test.txt';  while (FILE)    {     chomp;     push (@lines, $_\n);    }   close

Re: delete blank lines from text file

2012-10-01 Thread Irfan Sayed
thanks a lot ! will improve the coding standard. regards, irfan From: Shlomi Fish shlo...@shlomifish.org To: Irfan Sayed irfan_sayed2...@yahoo.com Cc: Perl Beginners beginners@perl.org Sent: Monday, October 1, 2012 4:08 PM Subject: Re: delete blank lines

regular expression help

2012-09-20 Thread Irfan Sayed
i have string 'c:\p4\car\abc\xyz.csproj' i just need to match the xyz.csproj i tried few option but does not help. can someone please suggest regards irfan

Re: regular expression help

2012-09-20 Thread Irfan Sayed
got it myself :) thanks a lot  $line_to_add =~ m/([a-zA-Z]+\.csproj)/; regards From: Irfan Sayed irfan_sayed2...@yahoo.com To: Perl Beginners beginners@perl.org Sent: Thursday, September 20, 2012 12:07 PM Subject: regular expression help i have string 'c

Re: regular expression help

2012-09-20 Thread Irfan Sayed
thanks a lot for all the responses :) regards From: Shlomi Fish shlo...@shlomifish.org To: Michael Brader mbra...@internode.com.au Cc: beginners@perl.org Sent: Thursday, September 20, 2012 2:53 PM Subject: Re: regular expression help On Thu, 20 Sep 2012

Re: destroy widget

2012-09-12 Thread Irfan Sayed
i am stuck. can someone please suggest regards, irfan From: Irfan Sayed irfan_sayed2...@yahoo.com To: Ron Bergin r...@i.frys.com; Shlomi Fish shlo...@shlomifish.org; Perl Beginners beginners@perl.org Sent: Saturday, September 8, 2012 8:10 PM Subject: Re

Re: destroy widget

2012-09-08 Thread Irfan Sayed
please suggest regards irfan From: Irfan Sayed irfan_sayed2...@yahoo.com To: Ron Bergin r...@i.frys.com Cc: Shlomi Fish shlo...@shlomifish.org; Perl Beginners beginners@perl.org Sent: Friday, September 7, 2012 4:40 PM Subject: Re: destroy widget thanks

Re: destroy widget

2012-09-07 Thread Irfan Sayed
Bergin r...@i.frys.com To: Irfan Sayed irfan_sayed2...@yahoo.com Cc: Shlomi Fish shlo...@shlomifish.org; Perl Beginners beginners@perl.org Sent: Wednesday, September 5, 2012 7:38 PM Subject: Re: destroy widget Irfan Sayed wrote: please find the attached . what i am looking for is, need to destroy

Re: destroy widget

2012-09-05 Thread Irfan Sayed
...@shlomifish.org To: Perl Beginners beginners@perl.org Sent: Tuesday, September 4, 2012 6:07 PM Subject: Re: destroy widget Hi Irfan, On Tue, 4 Sep 2012 05:01:11 -0700 (PDT) Irfan Sayed irfan_sayed2...@yahoo.com wrote: hi, i have following code to get the user input : $mw1 = MainWindow-new;    $mw1

destroy widget

2012-09-04 Thread Irfan Sayed
hi, i have following code to get the user input : $mw1 = MainWindow-new;    $mw1-geometry( 200x100 );    $mw1-title(Client Workspace);    $mw1-Label(    -text = Enter the Perforce client name:    )-pack(-anchor='center');       $mw1-Entry(     -textvariable = \$text_clnt    

Encode::ConfigLocal module

2012-08-28 Thread Irfan Sayed
hi, i need to use Encode::ConfigLocal module when i searched in CPAN, it is not available basically, i am converting perl program to exe using perl2exe it throws following error : C:\Users\bvcontrolbuild\Desktop\p2x-10.40-Win32perl2exe.exe ..\test3.pl Converting '../test3.pl' to

Re: insert in perl tk

2012-08-24 Thread Irfan Sayed
beginners@perl.org Sent: Friday, August 24, 2012 11:13 AM Subject: Re: insert in perl tk On Aug 23, 2012, at 9:35 PM, Irfan Sayed wrote: thanks. this will help to print the contents of array on separate line. however, if at all we need to call function then what is the syntax, how we can

Re: insert in perl tk

2012-08-24 Thread Irfan Sayed
thanks. it worked! regards irfan From: Shekar c.shekar1...@gmail.com To: Irfan Sayed irfan_sayed2...@yahoo.com Cc: Jim Gibson jimsgib...@gmail.com; Perl Beginners beginners@perl.org Sent: Friday, August 24, 2012 12:23 PM Subject: Re: insert in perl tk Try this. $t-insert(end, gettime

insert in perl tk

2012-08-23 Thread Irfan Sayed
hi, can we call function in the insert method of perl tk ? i have code like this:  $t-insert(end, \abc); so when this line gets executed, it should first call function abc please suggest regards irfan

Re: insert in perl tk

2012-08-23 Thread Irfan Sayed
can someone please suggest ? regards irfan From: Irfan Sayed irfan_sayed2...@yahoo.com To: beginners@perl.org beginners@perl.org Sent: Thursday, August 23, 2012 4:15 PM Subject: insert in perl tk hi, can we call function in the insert method of perl tk

Re: insert in perl tk

2012-08-23 Thread Irfan Sayed
, 2012 10:54 PM Subject: Re: insert in perl tk On Thursday, August 23, 2012 at 10:15 AM, Irfan Sayed wrote: can someone please suggest ? Explain what you're actually trying to achieve, instead of asking how to do what you think will let you accomplish what you're trying to achieve. Yes, if you

Re: insert in perl tk

2012-08-23 Thread Irfan Sayed
@perl.org Cc: Irfan Sayed irfan_sayed2...@yahoo.com Sent: Thursday, August 23, 2012 11:40 PM Subject: Re: insert in perl tk On Thu, 23 Aug 2012 10:51:09 -0700 (PDT) Irfan Sayed irfan_sayed2...@yahoo.com wrote: i need to print the contents of array on separate line , so , i thought , i should write

search and replace

2012-08-17 Thread Irfan Sayed
hi, i have string like this : $a = '$(workspace)\convergence\trunk'; i need to replace $(workspace) with 'c:\p4\abc' i wrote regex like this : $a =~ s/$\(workspace)/c:\\p4\\abc/; however, the string which i am getting is : $(c:\p4\abc)\convergence\trunk i need output like this :

Re: search and replace

2012-08-17 Thread Irfan Sayed
thanks a lot regards irfan From: Shawn H Corey shawnhco...@gmail.com To: beginners@perl.org Cc: Irfan Sayed irfan_sayed2...@yahoo.com Sent: Saturday, August 18, 2012 6:50 AM Subject: Re: search and replace On Fri, 17 Aug 2012 18:02:23 -0700 (PDT) Irfan

search and replace

2012-08-16 Thread Irfan Sayed
hi, i have following code to search single \ and replace it with \\ but it is not doing as expected: $csproj_text = C:\build.txt; $csproj_text =~ s/\\//g; print $csproj_text\n; the output is : Cuild.txt instead the output should be : C:\\build.txt can someone please suggest, what is the

Re: search and replace

2012-08-16 Thread Irfan Sayed
Awesome thanks all for reply . got it regards irfan From: midhun midhun...@gmail.com To: Rob Coops rco...@gmail.com Cc: Gergely Buday gbu...@gmail.com; Irfan Sayed irfan_sayed2...@yahoo.com; beginners@perl.org beginners@perl.org Sent: Thursday, August 16

xml parsing

2012-08-16 Thread Irfan Sayed
hi, i need to parse the xml file and store the data in array : here is the code: use XML::Simple; my $ItemGroup = XMLin('C:\Users\bvcontrolbuild\Desktop\data.xml'); foreach my $BuildProject (@{$ItemGroup-{BuildProject}}) {     print $BuildProject-{Include} . \n; } and xml file is :  

Re: xml parsing

2012-08-16 Thread Irfan Sayed
: Shlomi Fish shlo...@shlomifish.org To: Irfan Sayed irfan_sayed2...@yahoo.com Cc: beginners@perl.org beginners@perl.org Sent: Thursday, August 16, 2012 6:07 PM Subject: Re: xml parsing Hi Irfan, On Thu, 16 Aug 2012 04:55:33 -0700 (PDT) Irfan Sayed irfan_sayed2...@yahoo.com wrote: hi, i need

Re: xml parsing

2012-08-16 Thread Irfan Sayed
/2012 07:46 AM, Irfan Sayed wrote: can you please give me sample code to store the xml contents to perl array using LibXML lets say xml files is as :   ItemGroup       BuildProject Include=AssemblyInfo.csproj /       BuildProject Include=Assembly.csproj /     /ItemGroup regards irfan I'm

Re: xml parsing

2012-08-16 Thread Irfan Sayed
From: Lawrence Statton lawre...@cluon.com To: Irfan Sayed irfan_sayed2...@yahoo.com Cc: beginners@perl.org beginners@perl.org Sent: Thursday, August 16, 2012 7:28 PM Subject: Re: xml parsing Okay -- I've looked at the attachment -- remember when I

read file attributes

2012-07-30 Thread Irfan Sayed
hi, i need to access the attributes of file. more precisely, i need to check if the file is digitally signed or not for example; if i right click on file, then i need to check if the digital signature tab is there or not for that specific file and valid certificate is there. please suggest

Re: read file attributes

2012-07-30 Thread Irfan Sayed
thanks rob. how about Win32::File? regards irfan From: Rob Coops rco...@gmail.com To: Irfan Sayed irfan_sayed2...@yahoo.com Cc: beginners@perl.org beginners@perl.org Sent: Monday, July 30, 2012 5:23 PM Subject: Re: read file attributes On Mon, Jul 30

help in regular expression

2011-09-10 Thread Irfan Sayed
hi, i have following string. $val = 11.0.56.1; i need to write regular expression which should match only 56 and print please suggest  regards irfan

Re: print output on console at runtime

2011-07-28 Thread Irfan Sayed
can this be happen if command needs to be executed on remote machine and the output needs to be forked on the local console at runtime please suggest regards irfan From: Jim Gibson jimsgib...@gmail.com To: Perl Beginners beginners@perl.org Sent:

Re: print output on console at runtime

2011-07-28 Thread Irfan Sayed
irfan From: Irfan Sayed irfan_sayed2...@yahoo.com To: Jim Gibson jimsgib...@gmail.com; Perl Beginners beginners@perl.org Sent: Thursday, July 28, 2011 12:06 PM Subject: Re: print output on console at runtime can this be happen if command needs to be executed

environment variables in perl

2011-07-18 Thread Irfan Sayed
hi, i am executing one shell script within perl script. now what i need is , i need to make available all the variables set by that shell script to perl script for example following is the shell script build=abc export build echo $build now the value of $build i need to access in perl script

environment variables in perl

2011-07-18 Thread Irfan Sayed
hi, i am executing one shell script within perl script. now what i need is , i need to make available all the variables set by that shell script to perl script for example following is the shell script build=abc export build echo $build now the value of $build i need to access in perl script

Re: print output on console at runtime

2011-07-13 Thread Irfan Sayed
thanks John and Jim but, is this solution is applicable to only find command ? if i change the command to some other system command , will this solution work? plz suggest From: Jim Gibson jimsgib...@gmail.com To: Perl Beginners beginners@perl.org Sent:

Crypt::DH module error

2011-07-13 Thread Irfan Sayed
hi, i am getting error while using net::ssh::perl module to execute commands on remote machine following is the error : Math::BigInt: couldn't load specified math lib(s), fallback to Math::BigInt::Calc at /opt/ActivePerl-5.12/site/lib/Crypt/DH.pm line 6 i have installed these modules:

print output on console at runtime

2011-07-12 Thread Irfan Sayed
hi, i need to print the output of a command on the console at runtime lets say, i need to execute find command .as of now , what i am doing is , @cmd= `find . -name abc`; print @cmd\n; now what happens is, once the command completed then it will send entire output to @cmd and then entire

Re: Help on Net::Telnet perl module

2011-07-09 Thread Irfan Sayed
output of ls command/ this is also not happening plz suggest From: Jim Gibson jimsgib...@gmail.com To: Irfan Sayed irfan_sayed2...@yahoo.com; beginners@perl.org Sent: Saturday, July 9, 2011 4:08 AM Subject: Re: Help on Net::Telnet perl module You chose

Help on Net::Telnet perl module

2011-07-08 Thread Irfan Sayed
hi, i am using Net::Telnet module to connect to remote hosts i able to to successfully connect to remote host and run the ls command but the issue is , the output of command is not getting printed to scalar variable use Net::Telnet (); $t = new Net::Telnet (Timeout = 10, Prompt = '/bash\$

Re: Help on Net::Telnet perl module

2011-07-08 Thread Irfan Sayed
i have written my own code and i am printing dump_log and input_log as well in the log , it says , everything is successful, i am getting the output of ls command as well.in the log but on the console it is not printing the output plz suggest regards irfan

Re: rmdir

2011-06-28 Thread Irfan Sayed
Awsome!!! this works fine . Rob you rock thanks a lot. --irfan From: Rob Dixon rob.di...@gmx.com To: Perl Beginners beginners@perl.org Cc: Irfan Sayed irfan_sayed2...@yahoo.com Sent: Monday, June 27, 2011 11:54 PM Subject: Re: rmdir On 24/06/2011 10:43

Re: rmdir

2011-06-27 Thread Irfan Sayed
plz suggest . i am stuck From: Irfan Sayed irfan_sayed2...@yahoo.com To: Perl Beginners beginners@perl.org Sent: Friday, June 24, 2011 3:13 PM Subject: rmdir hi, i need to delete some directories recursively which are present at some shared location i

Re: rmdir

2011-06-27 Thread Irfan Sayed
i did that but no luck is there any another way ? regards irfan From: Shlomi Fish shlo...@shlomifish.org To: Irfan Sayed irfan_sayed2...@yahoo.com Cc: Perl Beginners beginners@perl.org Sent: Monday, June 27, 2011 5:05 PM Subject: Re: rmdir Shlomi Fish

Re: rmdir

2011-06-27 Thread Irfan Sayed
...@laposte.net Cc: Irfan Sayed irfan_sayed2...@yahoo.com; Perl Beginners beginners@perl.org Sent: Monday, June 27, 2011 5:53 PM Subject: Re: rmdir Hi Pangj, On Mon, 27 Jun 2011 14:07:51 +0100 pa...@laposte.net wrote: Won't system rm -rf /path/to/dir just work for you? 1. This is on Windows

Re: rmdir

2011-06-27 Thread Irfan Sayed
Corey shawnhco...@gmail.com To: beginners@perl.org Sent: Monday, June 27, 2011 6:09 PM Subject: Re: rmdir On 11-06-27 08:29 AM, Irfan Sayed wrote: even i tried windows del command but it prompts for confirmation to delete the files do u know how to suppress these prompts ? i did not find any

Re: rmdir

2011-06-27 Thread Irfan Sayed
how to unset the read-only attribute using win32::file module there r i guess only two methods 1: Getattributes 2: setattributes but the attribute which is already set, how to unset that ?? From: Rob Coops rco...@gmail.com To: Irfan Sayed irfan_sayed2

Re: rmdir

2011-06-27 Thread Irfan Sayed
From: Ron Bergin r...@i.frys.com To: Irfan Sayed irfan_sayed2...@yahoo.com Cc: Shlomi Fish shlo...@shlomifish.org; pa...@laposte.net pa...@laposte.net; Perl Beginners beginners@perl.org Sent: Monday, June 27, 2011 8:39 PM Subject: Re: rmdir Irfan Sayed wrote

rmdir

2011-06-24 Thread Irfan Sayed
hi, i need to delete some directories recursively which are present at some shared location i tried file::path perl module but the issue with that module is , it is not deleting the root/parent dir it deletes the subdirectories and all the files inside that but not removing root dir here

sort hash

2011-06-23 Thread Irfan Sayed
Hi, i need to sort hash in descending order. but the issue is , in hash, i have key as integer value and the value associated with that key is string so when i do sort it does not really sort the hash on the key level i used follwoing code foreach my $key (sort { $hash_fin{$b} =

Re: sort hash

2011-06-23 Thread Irfan Sayed
thanks rob. it worked From: Rob Dixon rob.di...@gmx.com To: beginners@perl.org Cc: Irfan Sayed irfan_sayed2...@yahoo.com Sent: Thursday, June 23, 2011 3:37 PM Subject: Re: sort hash On 23/06/2011 10:36, Irfan Sayed wrote: Hi, i need to sort hash

virtual drive

2011-06-15 Thread Irfan Sayed
Hi, is there any way or module in perl to create the virtual drive in windows lets say , i have to create M: mapped to c:\test so i can use command subst M: c:\test but still , is there any better way  regards irfan

draw html tables and send in mail

2011-05-31 Thread Irfan Sayed
Hi All, I wrote perl script to draw html tables and send that html tables in mail . i used two modules 1: html::tables and 2: mail::sendmail but when i send mail , it never prints the actual table in the mail body following is the code snippet, use HTML::Table; use Mail::Sendmail; $table

reg exp

2011-05-25 Thread Irfan Sayed
hi, i have string like this 2011/05/25 07:24:58 -0700 PDT  i need to match 2011/05/25 i wrote reg ex like this: ^\d\d\d\d//\d\d/\d\d$ but it is not working code is like this $lin = 2011/05/25 07:24:58 -0700 PDT; $lin =~ m/^\d\d\d\d//\d\d/\d\d$/; print $lin\n; plz suggest

Re: reg exp

2011-05-25 Thread Irfan Sayed
thanks it worked From: Marco van Kammen mvankam...@mirabeau.nl To: Irfan Sayed irfan_sayed2...@yahoo.com; Perl Beginners beginners@perl.org Sent: Wednesday, May 25, 2011 8:22 PM Subject: RE: reg exp Surely not perfect but this seems to work... $lin = 2011/05

Re: proper syntax for command

2011-05-24 Thread Irfan Sayed
here is the actual code: use strict; use warnings; use Cwd; chdir L:\\Console; my $dir = getcwd(); print current dir is : $dir\n; my $res = system(dir); $res=system(devenv,/rebuild,release,abc.sln,/useenv); print $res\n; now, the issue is , at last the value of $res is 256 instead of the real

proper syntax for command

2011-05-23 Thread Irfan Sayed
hi all, i am using following command to build the solution file using perl perl says some error :  following is the error : Bareword found where operator expected at -e line 1, near qx/C:\\Program Files\ \Microsoft Visual Studio .NET 2003\\Common7\\IDE\\devenv /rebuild syntax error at -e line

Re: proper syntax for command

2011-05-23 Thread Irfan Sayed
Corey shawnhco...@ncf.ca To: beginners@perl.org Sent: Monday, May 23, 2011 5:42 PM Subject: Re: proper syntax for command On 11-05-23 08:02 AM, Irfan Sayed wrote: L:\Consoleperl -e qx/C:\\Program Files\\Microsoft Visual Studio .NET 2003\\Com mon7\\IDE\\devenv /rebuild release abc.sln /useenv

Re: AW: proper syntax for command

2011-05-23 Thread Irfan Sayed
Marquardt christian.marqua...@trivadis.com To: Irfan Sayed irfan_sayed2...@yahoo.com Sent: Monday, May 23, 2011 5:45 PM Subject: AW: proper syntax for command Junk Score: 1 out of 10 (below your Auto Allow threshold) | Approve sender | Block sender | Block domain

Re: AW: proper syntax for command

2011-05-23 Thread Irfan Sayed
Subject: Re: AW: proper syntax for command On 11-05-23 09:17 AM, Irfan Sayed wrote: perl -e qx-C:\\Program Files\\Microsoft Visual Studio .NET 2003\\Com mon7\\IDE\\devenv /rebuild release abc.sln /useenv-; Put the double quotes outside of the entire Perl command: perl -e qx/C:\\Program Files

Re: proper syntax for command

2011-05-23 Thread Irfan Sayed
: Irfan Sayed irfan_sayed2...@yahoo.com Sent: Monday, May 23, 2011 7:55 PM Subject: Re: proper syntax for command On 23/05/2011 13:02, Irfan Sayed wrote: hi all, i am using following command to build the solution file using perl perl says some error : following is the error : Bareword

Re: proper syntax for command

2011-05-23 Thread Irfan Sayed
Cc: Irfan Sayed irfan_sayed2...@yahoo.com Sent: Monday, May 23, 2011 8:16 PM Subject: Re: proper syntax for command You chose to allow Rob Dixon (rob.di...@gmx.com) even though this message failed authentication Click to disallow

word boundry

2011-05-18 Thread Irfan Sayed
hi, i need to catch error word in log file i used reg exp like this : if ($_ =~ /\berror\b/) is this correct ? --irfu

sendmail in perl

2011-05-12 Thread Irfan Sayed
hi all, i need to use sendmail module of perl to send mails. i have seen much perl modules to send mails but i dont know which one is suitable for my requirement my requirement is :  i need such module which will allow me to generate/create table structure format in the main body of mail  no

command output

2011-05-11 Thread Irfan Sayed
Hi, i am running system command using following line in perl script ($stdout,$stderr) = capture_exec($workspace\\Dev_Tools\\Nant\\bin\\nant -buildfile:abc.build $target); print $stdout\n; print $stderr\n; now the issue is , the contents of these variable gets printed on console after this

Re: command output

2011-05-11 Thread Irfan Sayed
thanks rob. is there any another shorter way?? capture_exec is just external perl module from cpan. i am just using it as it is regards, irfan From: Rob Dixon rob.di...@gmx.com To: Perl Beginners beginners@perl.org Cc: Irfan Sayed irfan_sayed2...@yahoo.com

command formatting

2011-05-05 Thread Irfan Sayed
 Hi all, i have command like this: signtool.exe sign /f \\bvctrlbm18-\Digital Signature\sympfx.pfx /p test  C:\workspace\ESM\Convergence\Trunk\bin\ESMPolicyToCCSStandard.exe i need to execute this command in perl script. i need to use qx/command/; but i am stuck in formatting this command.

regular expression

2011-04-28 Thread Irfan Sayed
hi, i have following code. $target = abc,xyz; print $target\n; $target =~ s/,/\s/g; print $target\n; i need to replace comma with whitespace for string abc,xyz the output shud be abc xyz the above regular expression does not do that . please suggest --irfan

Re: regular expression

2011-04-28 Thread Irfan Sayed
: Thursday, April 28, 2011 7:47 PM Subject: Re: regular expression Irfan Sayed wrote: hi, Hello, i have following code. $target = abc,xyz; print $target\n; $target =~ s/,/\s/g; print $target\n; i need to replace comma with whitespace for string abc,xyz Whitespace is something that applies only

Re: regular expression

2011-04-28 Thread Irfan Sayed
thanks all From: Shawn H Corey shawnhco...@ncf.ca To: beginners@perl.org Sent: Thursday, April 28, 2011 7:55 PM Subject: Re: regular expression On 11-04-28 10:05 AM, Irfan Sayed wrote: hi, i have following code. $target = abc,xyz; print $target\n

Re: permission denied for Net::SSH::Perl module

2011-02-17 Thread Irfan Sayed
Hi All, I am still facing the issue. can someone please suggest ?? ~irfan --- On Thu, 2/10/11, Irfan Sayed irfan_sayed2...@yahoo.com wrote: From: Irfan Sayed irfan_sayed2...@yahoo.com Subject: permission denied for Net::SSH::Perl module To: beginners@perl.org Date: Thursday, February 10, 2011

permission denied for Net::SSH::Perl module

2011-02-10 Thread Irfan Sayed
Hi All, i am using Perl :net:ssh module to connect remotely to server and execute the remote command following is the code : my %opt = ( 'options' = [ 'ForwardAgent yes','RSAuAuthentication yes','ConnectTimeout 120','ServerAliveInterval 60','ServerAliveCountMax 20','debug 1','identity_files

Re: perl net::ssh module

2010-10-14 Thread Irfan Sayed
thanks now it is working fine --irfan From: Alexey Mishustin shum...@shumkar.ru To: beginners@perl.org Sent: Thu, October 14, 2010 11:08:24 AM Subject: Re: perl net::ssh module 10/13/2010, han sun sunhan...@gmail.com you wrote: 2010/10/12 Irfan Sayed

Re: perl net::ssh module

2010-10-13 Thread Irfan Sayed
can someone please help. i m totally stuck. Regards Irfan From: Irfan Sayed irfan_sayed2...@yahoo.com To: Alexey Mishustin shum...@shumkar.ru; beginners@perl.org Sent: Tue, October 12, 2010 3:29:05 PM Subject: Re: perl net::ssh module now getting following

Re: perl net::ssh module

2010-10-12 Thread Irfan Sayed
i am using this code : my $host = abc.data.com; my $user = ybici1; my $id_file = /home/ybici1/.ssh/openid; my $ssh = Net::SSH::Perl-new($host,$user,$id_file); my($stdout, $stderr, $exit) = $ssh-cmd(ls /homes/ybici1); print $stdout\n; print $stderr\n; print $exit\n; but still it is not

Re: perl net::ssh module

2010-10-12 Thread Irfan Sayed
now getting following error: Key class 'Net::SSH::Perl::Key::RSA' is unsupported: Cannot find current script './igor_tar.pl' at /home/y/lib/perl5/5.8/FindBin.pm line 188 BEGIN failed--compilation aborted at /home/y/lib/perl5/5.8/FindBin.pm line 188. here is the latest code: my $host =

perl net::ssh module

2010-09-30 Thread Irfan Sayed
Hi, I am using net::ssh module of Perl to connect to remote machine and execute some remote commands i can connect using user-name and password hard coded in the script like below: #!/usr/local/bin/perl use strict; use Net::SSH::Perl; my $host=dna-ci2.data.corp.sp1.xxx.com; my $cmd=ls; my

script to connect windows box from linux

2010-09-02 Thread Irfan Sayed
Hi All, I need to write one Perl script which does the following tasks 1: from linux box , connect to windows box 2: run some commands 3: copy the output of those commands to linux box can someone please guide me in how to achieve this using Perl script any direction / advise would be

Re: script to connect windows box from linux

2010-09-02 Thread Irfan Sayed
Can somebody please give me any pointer i am stuck Regards Irfan From: Irfan Sayed irfan_sayed2...@yahoo.com To: beginners@perl.org Sent: Thu, September 2, 2010 7:09:55 PM Subject: script to connect windows box from linux Hi All, I need to write one Perl

Re: print string in file

2010-08-19 Thread Irfan Sayed
Thanks all it worked. --Irfan From: Dr.Ruud rvtol+use...@isolution.nl To: beginners@perl.org Sent: Wed, August 18, 2010 12:35:57 AM Subject: Re: print string in file Irfan Sayed wrote: print MYFILE ?xml version=1.0 encoding=UTF-8?\n where MYFILE is a file

print string in file

2010-08-17 Thread Irfan Sayed
Hi All, I need to print some string into the file. the string is like this : ?xml version=1.0 encoding=UTF-8? i have written code like this : print MYFILE ?xml version=1.0 encoding=UTF-8?\n where MYFILE is a file handler. if i run this code , it is giving so many syntax errors. any advice

Copy files from one machine to another machine

2010-03-03 Thread Irfan Sayed
Hi all, I need to copy files from one machine to another machine. I need to use Net::SCP module . Can you please give/help me small Perl snippet which will copy the files Please advice Regards Irfan.

assign operator

2009-12-11 Thread Irfan Sayed
Hi All, Can somebody please tell me what is the difference between = and := sign in case of perl?? Regards Irfan.

Perl script

2009-09-25 Thread Irfan Sayed
Hi All, I am planning to wrire the perl script which will accomplish following task 1: login to remote windows machine 2: verify certain batch scripts are running or not Please let me know if this can be possible using perl script. Regards Irf

exit status

2009-06-30 Thread Irfan Sayed
Hi All, I have one windows batch script in which i am calling one perl script. now what i want to do is if the exit status of that perl script is non zero then batch script should not continue executing further and if the exit status is zero then only it shud further execute. normally we use

spaces in file name

2009-06-18 Thread Irfan Sayed
Hi All, I am stuck on parsing file name if it has space. I have file name as : file system.proj now this file contains space between worf file and system   now i want to do ceratin operation on this file but whenever i give this file name in any command then it fails saying that file does not

file handle in perl

2009-06-17 Thread Irfan Sayed
Hi All, I am struggling with file handling in perl. i want to do following operation . 1: open the file 2: read the file 3: do the changes in specific lines 4: save the file 5: close the file i am not getting which operand i should use to do this operation . i tried all operands like , , , +,

Re: file handle in perl

2009-06-17 Thread Irfan Sayed
thanks all From: Ajay Kumar ajay.kum...@synopsys.com To: Irfan Sayed irfan_sayed2...@yahoo.com Cc: beginners@perl.org beginners@perl.org Sent: Wednesday, June 17, 2009 3:42:41 PM Subject: RE: file handle in perl Hi Irfan You can do all four task like below 1

regular expression help

2009-06-17 Thread Irfan Sayed
Hi All, need help on regular expression. i have string like this  ProductName = 8:EXFO RTU System 1.2.42   now i want regular expression in such a way that it will change the line to :  ProductName = 8:EXFO RTU System 1.2.43   i tried in the following way.     $_ =~

Re: regular expression help

2009-06-17 Thread Irfan Sayed
it is not just 1.2.43 it may be anything it may be like 2.3.56 or 2.0.12 and so on... plz advice From: Ajay Kumar ajay.kum...@synopsys.com To: Irfan Sayed irfan_sayed2...@yahoo.com Cc: beginners@perl.org beginners@perl.org Sent: Wednesday, June 17, 2009 5:01

Re: file handle in perl

2009-06-17 Thread Irfan Sayed
; } From: Irfan Sayed irfan_sayed2...@yahoo.com To: beginners@perl.org beginners@perl.org Sent: Wednesday, June 17, 2009 4:02:47 PM Subject: Re: file handle in perl thanks all From: Ajay Kumar ajay.kum...@synopsys.com To: Irfan Sayed irfan_sayed2...@yahoo.com Cc

Re: AW: file handle in perl

2009-06-17 Thread Irfan Sayed
Irf From: Thomas Bätzler t.baetz...@bringe.com To: beginners@perl.org Cc: Irfan Sayed irfan_sayed2...@yahoo.com Sent: Wednesday, June 17, 2009 5:38:45 PM Subject: AW: file handle in perl Irfan Sayed irfan_sayed2...@yahoo.com asked: i am still not able to modify

need help on perl code

2009-06-16 Thread Irfan Sayed
Hi All, I have perl script like this : use strict; use warnings; use Cwd; my $chver; my $fina; chversion(); sub chversion {   print STDERR Current directory is . cwd() . \n;   print Reading version file\n; open (VER2, , 'D:\hudson\workspace\RTU_Trunk_Build_Official\Trunk\versions.txt') or die

CGI

2009-06-09 Thread Irfan Sayed
Hi ALL, i have written sample cgi script in perl. here it is #!/usr/bin/perl print Content-type: text/html\n\n; print HI; HTML HEAD   TITLEWelcome to CGI scripting /TITLE     /HEAD   /HTML     HI but when i am trying to execute this script it throws me an error like Can't find

Re: CGI

2009-06-09 Thread Irfan Sayed
Thanks . it worked. regards irf From: Owen rc...@pcug.org.au To: Irfan Sayed irfan_sayed2...@yahoo.com Cc: beginners@perl.org Sent: Tuesday, June 9, 2009 12:03:49 PM Subject: Re: CGI Hi ALL, i have written sample cgi script in perl. here it is #!/usr

CGI scripting

2009-06-08 Thread Irfan Sayed
Hi All, I need to configure Apache web server to execute the CGI scripts (in perl). Servers has windows XP operating system. i have downloaded apache but i am not able to see any www folder in the installed dir. of apache. do i need to configure IIS on this machine? and then manualy create the

Re: CGI scripting

2009-06-08 Thread Irfan Sayed
From: Eko Budiharto eko.budiha...@gmail.com To: Irfan Sayed irfan_sayed2...@yahoo.com Cc: beginners@perl.org Sent: Monday, June 8, 2009 1:17:59 PM Subject: Re: CGI scripting Regards Irf On Mon, Jun 8, 2009 at 2:06 PM, Irfan Sayedirfan_sayed2...@yahoo.com

perl script to check whether software is installed

2009-04-06 Thread Irfan Sayed
Hi All, i want to check whether a particular software is installed or not through perl script. if it is installed then uninstall that software and start installation freshly. if it is not installed then start the installation. I have following option to check 1: read the reqister and search

Re: perl script to check whether software is installed

2009-04-06 Thread Irfan Sayed
please adivce / help Regards Irfan From: Irfan Sayed irfan_sayed2...@yahoo.com To: beginners@perl.org Sent: Monday, April 6, 2009 2:49:40 PM Subject: perl script to check whether software is installed Hi All, i want to check whether a particular software

Re: WIN32:OLE module

2009-04-02 Thread Irfan Sayed
je...@krynicky.cz To: beginners@perl.org Sent: Thursday, April 2, 2009 4:32:13 AM Subject: Re: WIN32:OLE module From: Irfan Sayed irfan_sayed2...@yahoo.com I have one perl script in which i am using win32:OLE perl module. Now i need to convert script so that it can support solaris OS also. can

Re: WIN32:OLE module

2009-04-02 Thread Irfan Sayed
sorry i did not get. could you please explain once again regards jaya From: Jenda Krynicky je...@krynicky.cz To: Irfan Sayed irfan_sayed2...@yahoo.com Sent: Thursday, April 2, 2009 3:36:57 PM Subject: Re: WIN32:OLE module Date sent:    Thu, 2 Apr 2009 02:07

WIN32:OLE module

2009-04-01 Thread Irfan Sayed
Hi All, I have one perl script in which i am using win32:OLE perl module. Now i need to convert script so that it can support solaris OS also. can it be possible?? if yes what is the equivalant module of win32:OLE on unix or any other option. Please advice. Jaya

  1   2   >