RE: z/OS unicode problem.

Hi, May be this is could be useful; Unicode characters have two bytes for each character. Each character has "0x00" following to the each character. You need to remove the "0x00" after each character and then do the Regular Expression matching. my $temp = chr(0x00); $line =~ s/$temp//g; this rem

Test.

Do not read. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

How do I open 2 files at once 1 to be checked against the other

Please help I need to make a spell check program that will open a dictionary that the user enters the name of and then a file that will be checked against the dictionary file. so at prompt % spellcheck.pl Dictionary_file Check_this_file the program will open the Dictionary_File and then op

RE: Load an hash from a text file

Web Solving <[EMAIL PROTECTED]> wrote: : i tried inserting the "g" where you said but it doesn't : work as i want. Using the contents you gave I got the correct replacements. LaoTzu i sone of the most important "gods" in Taoism . The Tao philosophy is wide spread in China. Tao and Taoism

Re: scp in perl

On Wed, 2 Mar 2005 14:54:38 -0800 (PST), susan lam <[EMAIL PROTECTED]> wrote: > Hi, > I have a script that copies files from one server to > another via the scp system call. On unix, I usually do > a "sum" manually on files to make sure that the files > got transferred properly. > > I would like t

z/OS unicode problem.

Hi, I had a question regarding utf-ebcdic issues on z/OS. I tried this on a perl-5.8.6. If I use a unicode character within a character class and try matching the same using a regular expression, I get a failure. e.g. if I write this ; use charnames:full; $a = "\N{LATIN SMALL LETTER A WITH GRAV

scp in perl

Hi, I have a script that copies files from one server to another via the scp system call. On unix, I usually do a "sum" manually on files to make sure that the files got transferred properly. I would like to automate this process in perl - transferring files over to another server and verifying t

Re: Regex for file uploads - help needed

Wiggins d'Anconia wrote: Kevin Old wrote: Hello everyone, I have a regex in a file upload script that I'm trying to make work with Windows upload paths. Here's the snippet of code I'm working with (see comments for questions): # This is what is passed to me from the upload form my $filename = 'C:\D

Re: Foreach Code Issue

Wilson, Josh --- Systems Analyst --- GO wrote: All, Hello, I'm trying to determine what is wrong with this script. Here is what I'm trying to do: 1.) Export the output of the following command to a file located at c:\perl\bin\log\accessreport.log Global "Domain Admins" ARFW > c:\perl\bi

bioperl about Bio::Tools::Run::RemoteBlast

hi, When I use Bio::Tools::Run::RemoteBlast,I can not connect with web server. #!/usr/bin/perl -w use Bio::Tools::Run::RemoteBlast; use strict; my $prog = 'blastp'; my $db = 'swissprot'; my $e_val= '1e-10'; my @params = ( '-prog' => $prog, '-data' => $db, '-expect' => $e_val,

Test.

This is only a test. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: a simple daemon -- works, but won't let me logout

Thanks Wiggins! Turns out I hadn't pointed STDOUT somewhere away from the terminal, but I wouldn't have caught that without your suggestion. - Bryan > Bryan R Harris wrote: >> >> I'm building a simple daemon in perl ("ko") that fires off processes as soon >> as the loading on our batch ser

Re: pattern matching

Aaron Reist wrote: From: "John W. Krahn" <[EMAIL PROTECTED]> Aaron Reist wrote: From: "John W. Krahn" <[EMAIL PROTECTED]> You could use a regular expression to do that. my $input = get_input_from_user(); $input =~ /\A(?:[[:alpha:]]([[:alnum:]]{9})[[:alpha:]]|(\d[[:alnum:]]{7}\d))\z/ and my $

Re: Regex for file uploads - help needed

On Wed, 02 Mar 2005 13:31:02 -0500, Wiggins d'Anconia <[EMAIL PROTECTED]> wrote: > Kevin Old wrote: > This is probably going to take a bit more info. Why would there be two > extensions? Unless you have some rules to locate double extensions this > is probably going to be difficult, because of arb

Re: Regex for file uploads - help needed

Kevin Old wrote: Hello everyone, I have a regex in a file upload script that I'm trying to make work with Windows upload paths. Here's the snippet of code I'm working with (see comments for questions): # This is what is passed to me from the upload form my $filename = 'C:\Documents and Settings\ata

Re: a simple daemon -- works, but won't let me logout

Bryan R Harris wrote: I'm building a simple daemon in perl ("ko") that fires off processes as soon as the loading on our batch server is low enough to handle them. Someday I hope to put in some custom logic that runs more at night, fewer in the day, etc. Problem: I can launch the daemon on the ir

Re: code on stonehenge.com for adding line numbers to code

> "Paul" == Paul Johnson <[EMAIL PROTECTED]> writes: Paul> On Wed, Mar 02, 2005 at 05:22:14AM -0800, Randal L. Schwartz wrote: >> From emacs: >> step 1 - highlight Perl code as region >> step 2 - ^U ESC ! expand | perl -pi 's/^/\t=$.=\t/' CR >> >> It's programmed into my fingers. :) Paul> Th

Re: code on stonehenge.com for adding line numbers to code

On Wed, Mar 02, 2005 at 05:22:14AM -0800, Randal L. Schwartz wrote: > From emacs: > step 1 - highlight Perl code as region > step 2 - ^U ESC ! expand | perl -pi 's/^/\t=$.=\t/' CR > > It's programmed into my fingers. :) Then you hit undo and try again without the typo? -- Paul Johnson - [EMAIL

Regex for file uploads - help needed

Hello everyone, I have a regex in a file upload script that I'm trying to make work with Windows upload paths. Here's the snippet of code I'm working with (see comments for questions): # This is what is passed to me from the upload form my $filename = 'C:\Documents and Settings\ata\My Documents\

a simple daemon -- works, but won't let me logout

I'm building a simple daemon in perl ("ko") that fires off processes as soon as the loading on our batch server is low enough to handle them. Someday I hope to put in some custom logic that runs more at night, fewer in the day, etc. Problem: I can launch the daemon on the irix server, but I ca

Re: Net::DNS

The reason I tested all three situations: if ( $query != 0 or $query != undef or $query != ' ' ) { was for knowledge and repitition that everytime I looked at the code I would know what all 3 meant and that they had the same meaning, 0. In addition I wanted to be anal ! > Maybe a dumb qu

Re: code on stonehenge.com for adding line numbers to code

>> "Gavin" == Gavin Henry <[EMAIL PROTECTED]> writes: > >>> perl -pe 's/^/=$.= /' test.pl > > Gavin> That looks familiar > > Yup. > > From emacs: > step 1 - highlight Perl code as region > step 2 - ^U ESC ! expand | perl -pi 's/^/\t=$.=\t/' CR > > It's programmed into my fingers. :) I knew yo

Re: critique my script!

Christopher Spears wrote: I've been learning C++ using cygwin on my Windows PC and thought it would be handy to have a Perl script that automated features of g++. The script takes one to two invocation arguments: ./cedit somefile.C++ ./cedit somefile.C++ outputfile cedit runs g++. After the file

Re: code on stonehenge.com for adding line numbers to code

Thus spaketh To beginners@perl.org: > Thus spaketh Randal L. Schwartz: > > > "Gavin" == Gavin Henry <[EMAIL PROTECTED]> writes: > > > > >> perl -pe 's/^/=$.= /' test.pl > > > > Gavin> That looks familiar > [ ... ] Sorry. > Yes. But I found a way to confuse myself. > > Why does > > perl -p

Re: Inserting HTML tags

Danny Fang wrote: Hi, I'm a newbie with Perl and I wrote a perl script (see below) whose function is to read a *.html file and checks to insert the following HTML tags i.e , , , , history.forward( ) if these tags are not present. Content of the html test file are as follows: [snip] May I know what

redirecting STDOUT/STDERR and File::Copy

Hi list, I've got some strange behaviour with redirected STDOUT/STDERR handles and calls to File::Copy - I hope someone can explain me why I'm seeing what I'm seeing here. I use the following code to redirect STDOUT and STDERR to a log file - as you can see, it's more or less copied directly f

Re: Multiple file upload

Mallik wrote: Dear All, Anybody knows how to upload multiple files from a web page to server without using multiple file upload fields? Assumption: All files are in same directory? The user can provide the folder path (own PC) where the files exist. We don't want the user to click the brows

Re: XML::LibXML Issue

Anish Kumar K. wrote: Hi I wanted to get some information regarding XML reading Say I have a XML like this - - 450 to 500 kg. 1230 If I wanted to read Mass value from this XML. I do not want to us

Re: Multifile project question

Peter Rabbitson wrote: Hi everyone. I have a question regarding splitting large projects into multiple files to add at least a little convenience when further maintenance is needed. Consider this more than trivial example to be a program of 4000 lines: print '> '; my $input = ; chomp $input; if ($i

Re: Net::DNS

John Doe wrote: Hi Derek, hi all (see below, please help) [...] my $res = Net::DNS::Resolver->new; my $query = $res->query(".ohnet", "NS"); if ( $query != 0 or $query != undef or $query != ' ' ) { Please replace this condition by if ($query) I'm to confused at the moment t

Re: code on stonehenge.com for adding line numbers to code

Thus spaketh Randal L. Schwartz: > > "Gavin" == Gavin Henry <[EMAIL PROTECTED]> writes: > > >> perl -pe 's/^/=$.= /' test.pl > > Gavin> That looks familiar [ ... ] Yes. But I found a way to confuse myself. Why does perl -e '$_.="$. "' some_file start the enumaration at line 2, while perl

Re: code on stonehenge.com for adding line numbers to code

> "Gavin" == Gavin Henry <[EMAIL PROTECTED]> writes: >> perl -pe 's/^/=$.= /' test.pl Gavin> That looks familiar Yup. >From emacs: step 1 - highlight Perl code as region step 2 - ^U ESC ! expand | perl -pi 's/^/\t=$.=\t/' CR It's programmed into my fingers. :) -- Randal L. Schwartz - Sto

Re: Multiple file upload

* Mallik <[EMAIL PROTECTED]> [2005-03-02T07:26:15] > Anybody knows how to upload multiple files from a web page to server > without using multiple file upload fields? The file input selects one file, and that's that. You could have the user first create an archive to upload, but then you'd need t

Multiple file upload

Dear All, Anybody knows how to upload multiple files from a web page to server without using multiple file upload fields? Assumption: All files are in same directory? The user can provide the folder path (own PC) where the files exist. We don't want the user to click the browse buttons mult

Re: Load an hash from a text file

errata corrige: Lao Tzu|http://www.laotzu.com";>LaoTzu Taoism|http://www.taoism.com";>Taoism Tao |http://www.taoist-directory.com";>Tao -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: Load an hash from a text file

i tried inserting the "g" where you said but it doesn't work as i want. content of my files: in.txt: Lao Tzu|LaoTzu Taoism|Taoism Tao |Tao in.blah: Lao Tzu i sone of the most important "gods" in Taoism. The Tao philosophy\n is wide spread in China. Tao and Taoism rapresent my religious beliefs\n

Re: Load an hash from a text file

i tried inserting the "g" where you said but it doesn't work as i want. content of my files: in.txt: Lao Tzu|LaoTzu Taoism|Taoism Tao |Tao in.blah: Lao Tzu i sone of the most important "gods" in Taoism. The Tao philosophy\n is wide spread in China. Tao and Taoism rapresent my religious beliefs\n

Inserting HTML tags

Hi, I'm a newbie with Perl and I wrote a perl script (see below) whose function is to read a *.html file and checks to insert the following HTML tags i.e , , , , history.forward( ) if these tags are not present. Content of the html test file are as follows: HELLO Test file SCRIPT: #!/usr/

Re: Foreach Code Issue

Wilson, Josh --- Systems Analyst --- GO ha scritto: All, I'm trying to determine what is wrong with this script. Here is what I'm trying to do: 1.) Export the output of the following command to a file located at c:\perl\bin\log\accessreport.log Global "Domain Admins" ARFW > c:\perl\bi

XML::LibXML Issue

Hi I wanted to get some information regarding XML reading Say I have a XML like this - - 450 to 500 kg. 1230 If I wanted to read Mass value from this XML. I do not want to use the techinq with