trouble

I am having trouble posting to the Beginners Perl list.  Is there a problem? I understand that to upload a module to CPAN is need to obtain a PAUSE account.  I have tried twice to get that, but I don't receive an e-mail with a password. http://www.mflan.com/temp/pause.jpg If anybody can noti

Re: CPAN not working, or is it?

I wanted you to know that we are out here, but just unable to help you. I doubt this old post will help you any: https://centosfaq.org/centos/perl-on-centos-6-and-centos-7/ Mike On 3/11/2019 8:55 AM, Gary Stainburn wrote: I'm replacing a dead F19 box with a new C7 one and I'm trying to get

Re: covert perl code to binary

that has instructions for how to do it on Windows As noted by another poster, it seems to work in spite of the test blowing up On 1/11/19 5:37 AM, Mike Flannigan wrote: I could use some more explanation. B::C is a module that you install from CPAN. I assume I don't put Use B::C a

Re: covert perl code to binary

<http://foo.pl> and found a file  "foo". I ran ./foo and its output was the same as ./foo.pl <http://foo.pl> Opening foo, I found the string 'Hello, world.' but only once amongst a lot of control characters and error messages. I'm afraid I don't have a W

Re: covert perl code to binary

I could use some more explanation. B::C is a module that you install from CPAN. I assume I don't put Use B::C at the top of my perl script, but instead perlcc uses it. Is perlcc also a module? Or is that an executable? I think I see that it is composed of 5 files: assemble cc_harness disassembl

Re: What does "use 5.008;" affect?

I'm still not sure I know, but I learned a lot from these articles: https://stackoverflow.com/questions/1878108/whats-the-modern-way-of-declaring-which-version-of-perl-to-use https://perldoc.perl.org/functions/use.html Maybe the 2nd one describes what it does. Mike On 12/22/2018 3:43 AM,

Re: Code Assistance Pls

These 2 lines: if (/^        file-id $i/) { and elsif (/^        exit/) { Need to be like this: if (/^\s+file-id $/i) { # 2 CHANGES HERE - PAY CLOSE ATTENTION and elsif (/^\s+exit/i) { I am not sure this will fix all your problems. Mike On 11/21/2018 5:08 AM, Amanda Paziuk wrote: Folks

Re: Strange behavior when printing a 4G+ integer on 32bits platform.

I don't have an answer for you, but I find this interesting.  I note the same issue in 64bit up near 18446744073709551615 I'm guessing the guy who wrote Math::BigInt may have the answer. Mike On 11/13/2018 8:07 AM, Tetsuo Handa wrote: Hello. I want to represent up to a few hundreds gigaby

Re: data structure for Template Toolkit

Are you on Linux or using Strawberry Perl? I used Activestate for 15+ years and I was surprised by how easy it was to move to Strawberry Perl about 3 years ago.  It's pretty darn easy to install modules with Strawberry Perl and seems to work every time. Mike Uri, thanks for the boatload of us

Re: data structure for Template Toolkit

I hope somebody has replied already. If not, in general you are reading data from DATA, creating an array and a hash, and then creating an html file using the Template Toolkit. I think much of it looks good, but I see no use Template::Toolkit or anything similar. Do you have that?  I suspect you

Re: sftp code to use

One way to unzip with Perl is this method: use warnings; use strict; use Archive::Zip qw( :ERROR_CODES :CONSTANTS ); my $zipfile = 'zipped.zip'; my $zip = Archive::Zip->new(); die "Error reading $zipfile:$!" unless $zip->read($zipfile) == AZ_OK; $zip->extractMember($zipfile) for $zip->member

Re: Regex for date

Really, no attempt to do it yourself? Mike On 8/25/2018 6:06 AM, beginners-digest-h...@perl.org wrote: Hi All ,           I need  a regex to match the date : Sat Aug 25 08:41:03 2018 and covert into a format :  '%m/%d/%Y %H:%M:%S' Thanks, -- Asad Hasan

Re: What hash function to use

I hope somebody helps you with this. I don't think this will help you.  It sounds like you already know all of this: https://crackstation.net/hashing-security.htm I don't know what $2b$ is.  Still trying to figure that out. It looks like Digest::Bcrypt was last updated 3/2017. I hope it hasn't

Re: difficulty with matching

Please make an executable code without the hash (just use a variable) and with the DATA fed below __DATA__ in the script.  Then I would suggest putting an "if" in front of the match line and print "It Matched.\n". Maybe put a elsif with only 2 matches. If you keep playing with it like this you

Re: regex with HEX ascii chars

Try: binmode(HANDLE) before reading the file. HANDLE is your filehandle. If that doesn't work you might want to supply the text file and a sample script. Mike On 4/12/2018 12:04 PM, beginners-digest-h...@perl.org wrote: I have a text file (created by pdftotext) that I've imported into my

Re: [^/]* Is Not Working

Correction, I am now receiving the posts. Sorry. On 3/23/2018 8:12 PM, beginners-digest-h...@perl.org wrote: Thank you John Anderson and others. I see your answers in the archives, but for some reason I am not receiving the list postings anymore.  I am working to correct that. It appears th

Re: [^/]* Is Not Working

Thank you John Anderson and others. I see your answers in the archives, but for some reason I am not receiving the list postings anymore.  I am working to correct that. It appears the last time I received a post was 3/17/2018. Mike On 3/17/2018 10:02 AM, Mike Flannigan wrote: This line

[^/]* Is Not Working

This line works fine: if ($link =~ m#/([^/]*)$#) { But this one in its place does not work: if ($link =~ m/\/([^/]*)$/) { # Oddly this does not work Gives error: Unmatched [ in regex; marked by <-- HERE in m//([ <-- HERE ^/ at csvtopo24.pl line 74. I think it has to do with the "[^/]*". Any

Re: Checking if a website is up doesn't work correctly

See if some version of the attached program gives the results you expect. Mike On 2/13/2018 8:33 PM, beginners-digest-h...@perl.org wrote: I tried WWW::Mechanize, and (of course) got also 403. Really strange. Is there another tool I could use for checking? I mean some tool in the Perl univ

Re: Unescaped Left Brace

Z\s]{10,})/s) { would be correct - possibly getting all of the first 10+ char sentence/phrase up to the first punctuation mark. On Thu, Nov 23, 2017 at 6:56 PM, Mike Flannigan <mailto:mikef...@att.net>> wrote: Thanks for pointing that out. I'll be darned.  I need to chec

Re: Unescaped Left Brace

hat one line to: unless ($text =~ /[a-zA-Z\s]{10,}/s) { Thanks for the response. Mike On 11/23/2017 8:31 AM, X Dungeness wrote: Hm, that's a misbegotten quantifier. From 5.26.0 perlreref: There is no quantifier "{,n}". That's interpreted as a literal string. On Thu, Nov 23, 2

Unescaped Left Brace

y this is a huge problem.  Seems like the migration to Perl 5.30 is going to be interesting to say the least. Anybody have any other comments about this? Mike Flannigan -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/

Re: "Information station" using Perl and Raspberry Pi

I can't be the best one to answer this, but I might be the only one that responds. What you want might be hard, though that would surprise me. That seems to be the consensus in this discussion: http://www.tomsguide.com/answers/id-1920620/cheapest-show-browser-long-term.html I have no direct ex

Re: Bad display of accents in Subject

I'm not sure this is the answer, but try Unicode::Collate http://stackoverflow.com/questions/7429964/how-to-match-string-with-diacritic-in-perl Mike On 3/19/2017 10:58 PM, beginners-digest-h...@perl.org wrote: Hello, when I run this script: (it's an excerpt) -

Re: XML::Simple Umlaute

I'm not sure if it is possible to use Umlaute in XML Files or not. Maybe this post with help you: http://stackoverflow.com/questions/11772468/reading-xml-files-with-umlaut-chars Is there a way to change encoding to "iso-8859-1"? Mike On 7/28/2016 8:03 AM, beginners-digest-h...@perl.org wrot

Re: reading directories using perl in windows

FYI, there is no error. If the directory path has no spaces it works fine, if the directory path has spaces it prints the path up to the 1st space and just goes back to a cursor line. Mike On 3/6/2016 5:04 AM, beginners-digest-h...@perl.org wrote: Subject: Re: reading directories using perl

Re: sure would be nice if Perl had trace command built-in

On 12/10/2015 5:40 AM, beginners-digest-h...@perl.org wrote: On Mon, Dec 7, 2015 at 6:33 PM, Brock Wilcox wrote: >Give devel::trace or devel::tracemore a try:) Is it possible to install this from Active State repository without having an-up-date ActiveState Perl DevKit license? Thanks,

Re: uniq array creation

See if this meets your needs: http://www.arl.wustl.edu/projects/fpx/references/perl/cookbook/ch04_07.htm Mike On 11/25/2015 1:53 AM, beginners-digest-h...@perl.org wrote: Hi I want to create a unique array . I have the code below. It is creating a array which will have duplicate data

Re: converting Genbank format in gff format

On 8/20/2015 4:01 AM, beginners-digest-h...@perl.org wrote: Subject: Re: converting Genbank format in gff format From: John SJ Anderson Date: 8/17/2015 10:03 PM To: Perl Beginners On Mon, Aug 17, 2015 at 3:58 PM, Uri Guttman > wrote: On 08/17/2015 03:57 A

Re: Getting 2/8 as output

com/output-field-separator-and-list-separator On Wednesday, June 17, 2015, Mike Flannigan <mailto:mikef...@att.net>> wrote: If I am not mistaken there is no $, variable in Perl. Correct me if I am wrong. I suspect that was supposed to be $/. Mike

Re: Getting 2/8 as output

If I am not mistaken there is no $, variable in Perl. Correct me if I am wrong. I suspect that was supposed to be $/. Mike On 6/17/2015 7:32 AM, beginners-digest-h...@perl.org wrote: { local $, = "\n"; print %test; } -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For add

Re: Can't find EOCD signature Archive::Zip

Thank you so much. This one gives an error due to the GCC compiler not being installed. I'm not going to install that right now, but I am going to file this away for the future. I'm sure I will want to do this in the future. Thank you very much. Mike On 12/7/2014 9:29 AM, Omega -1911 wrot

Re: Can't find EOCD signature Archive::Zip

of GZ files. I will use other means to get his done. Mike On 12/4/2014 6:15 AM, Mike Flannigan wrote: This is a very old problem that apparently still persists. Some or all gzip files created on Unix can't be unzipped by Archive::Zip (1.38). There are tons of old posts from 2005

Can't find EOCD signature Archive::Zip

This is a very old problem that apparently still persists. Some or all gzip files created on Unix can't be unzipped by Archive::Zip (1.38). There are tons of old posts from 2005 that mention this problem, but apparently it is not an easy fix. Here is one link: http://www.perlmonks.org/?node_id

Re: Can't Install Mojolicious on Shared Server

On 7/30/2014 11:14 PM, Octavian Rasnita wrote: Catalyst can be used with the CGI interface, but it would be very slow, so not recommended at all. Octavia I was told it could also be used with PSGI/Plack. I'm hoping that is better. I got past the nmake issue with my Win7, but I suspect I

Re: Can't Install Mojolicious on Shared Server

Interestingly Hostgator already has Catalyst installed, so for now I'm going to give that a try. Mike On 7/29/2014 6:25 PM, Mike Flannigan wrote: I pay about $8 per month for a shared server hosting at Hostgator. I recently asked Hostgator to install Mojolicious on my account beca

Re: Can't Install Mojolicious on Shared Server

Thanks for the quick reply. I'll look into it. Mike On 7/29/2014 6:24 PM, Hao Wu wrote: use DigitalOcean about $5 a month. you get everything you need. I am running Dancer2 in DigitalOcean, runs great. -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-

Can't Install Mojolicious on Shared Server

I pay about $8 per month for a shared server hosting at Hostgator. I recently asked Hostgator to install Mojolicious on my account because I wanted to migrate away from CGI. Hostgator tells me they can't install Mojolicious "on a shared server as to install any custom modules you will need root

Plack and PSGI

he PSGI scripts? So there is no need to plackup on the webhost server side? When I do plackup on my computer and access it on http://localhost:5000/ Is that done just for testing purposes? Mike Flannigan -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-ma

Re: Brand New

Howdy, I get a 404 Not Found when I go to that link. You can use Perl as a browser, but it's not beginner material and Perl generally does not do simple browsing as well as a browser. When you see "This site requires Javascript", click on "options" in the lower right, go to the bottom of the l

Re: checking for file existence

print "The file $file_seqs exist!!! \n"; } Hi Renato, Welcome to Perl. Your code looks fine and it works for me. Try entering the full path to the file you are checking for. You could reduce my $file_seqs; $file_seqs = $ARGV[0]; to just my $file_seqs = $ARGV[0]; Mike

Re: Recursive Validation Function

On 9/2/2013 8:23 PM, John wrote: Hello all, I am writing a script to rename files. The script prompts the user to enter tokens which will comprise part of the file name. These are made of letters and numbers separated by a dot, ie: R.3. The letters can be R, I or C, upper or lowercase. The

Re: Win32 - Killing Processes

On 4/9/2013 6:10 AM, Jonathan Harris wrote: Hi All I am using Strawberry Perl (latest release) on a Windows 2003 SP2 server I am trying to use a script to look at running processes, look for a specific process, and kill that process if it is alive for more than 4 minutes as this would mean tha

Re: BEGIN Block in CGI Script

Thank you. On 1/28/2013 3:07 PM, Shawn Corey wrote: The attached CGI is useful for determining what a script's environment is.

Re: BEGIN Block in CGI Script

Thanks so much for the quick response. I appreciate it. Of course I am putting this cgi file on my website domain and running it there, so in a way it is running on Unix. It is running that code, but whether it is working or not is not clear to me. At the beginning of the code @INC is: /usr/l

BEGIN Block in CGI Script

finding a module I have installed and am calling in this CGI script? Mike Flannigan -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/

ActiveState Perl Install Location

rl.com/dxmh9oe that "Perl is installed by default in |C:\Perl". That is where I want it, but it doesn't look like it whet there. I have perl.exe, perl5.6.1.exe, and perl5.8.0.exe files in C:/Perl/bin. The newest file in that directory is libeay32.dll from 2/2012. | Very odd. If anybody knows where it installs please let me know. Mike Flannigan

CPAN - Module Issue

On 10/4/2012 9:15 PM, "Owen" wrote: There is spam free news group, comp.lang.perl.announce that puts out a posting every day listing a sample of about 50 modules. If you read that every day, you will get the idea of what is what. Alsohttp://search.cpan.org/ is the home site that allows you

Re: HTML::TextToHTML Doesn't Work with instring

On 6/15/2012 2:24 AM, Rob Dixon wrote: Hi Mike Line 565 of your module file shows that it is version 1.12 which dates from February 2003. The API of that version was very different, and I presume you are not following the documentation that came as part of the module. In particular that versi

Re: HTML::TextToHTML Doesn't Work with instring

line of the module. There is no $source in my code, so I am trying to figure it out. My version of TextToHTML.pm is located here: http://www.mflan.com/temp/TextToHTML.pm Thanks for your help. Mike Flannigan -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands

HTML::TextToHTML Doesn't Work with instring

: http://txt2html.sourceforge.net/txt2html.html#options_files Mike Flannigan # # # This script converts TXT to html. # # use strict; use warnings; use HTML::TextToHTML; my $html_file = 'htmlout.htm'; #my $texttemp = "abcd\nefghij\nklm"; my $texttemp = "abcdefghijklm&quo

Re: Template toolkit issue [SOLVED]

ul program flow (work flow) in my opinion, but gets the job done. What I really need is a Perl buddy (near Johnson Space Center in Houston, TX), who can show me some new tricks. But I can also figure these things out on my own sometimes. I guess I'll get started on Dancer now. Mike Flannigan

Re: List Experience

ve a free list where I can get so much great help. I'll put up with the oddities of others to have this resource available. Mike Flannigan -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/

Re: WMI

On 4/17/2011 12:22 PM, beginners-digest-h...@perl.org wrote: Based on http://support.microsoft.com/kb/320046 and http://support.microsoft.com/kb/320047 Looks like it was park of win2k resource kit John Thanks to all who responded to my WMI module query. Mike

WMI

find the answer. _ #!C:/perl/bin/perl use strict; use WMI; open STDOUT, ">services.txt" or die "Cannot open services.txt: $!"; my $WMI = WMI->new("localhost"); $WMI->getServices(); close STDOUT; # **** pr

Re: Dereference Links

're working with. Off the top though: map {@$_} @$arr might be a start. _ Thank you Rob and Shawn. It worked well. I can't claim I know fully why, but it worked. I sure hope Perl6 gets rid of dereferencing. Mike Flannigan -- To unsubscribe, e

Re: Dereference Links

On 1/23/2011 5:21 PM, beginners-digest-h...@perl.org wrote: >That module hasn't been updated since 2001. You'll have a >much easier time using WWW::Mechanize and many more people will be in>a position to help you. >Peter Scott > Thank you for the reply. I appreciate it. Mike Flannigan

Dereference Links

;d like to know how to dereference this script. Mike Flannigan # # # #!/usr/local/bin/perl # use strict; use warnings; use WWW::SimpleRobot; my $robot = WWW::SimpleRobot->new( URLS=> [ 'http://www.portofhouston.com/' ], FOLLOW_REGEX=> "^http://ww

Re: Change character code 160 to 32

Shawn H Corey wrote: Use the hex notation: perl -i -ple 'tr/\xA0/\x20/' Thank you. Much appreciated. I do like that much better. Someday I'll know hexidecimal better. Right now it's got a little magic for me. Mike -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For addit

Change character code 160 to 32

. It does not have to be a reg exp. Anybody know why this doesn't work? tr/\160/\32/d; Oddly it replaces 'p' (character code 80) with character code 26??? I get the digest version, so may not respond right away. Mike Flannigan -- To unsubscribe, e-mail: beginners-unsubscr...@

[Fwd: Re: script to SFTP without NET::SFTP module]

--- Begin Message --- About a year ago I spent a half day trying to do this with no restrictions placed on me. I was unsuccessful. In my searches I came to the conclusion that there was no publicly available method to get it done. I hope that is still not the case. Mike Flannigan On

Re: CGI Listserver

Jeff Pang wrote: See this: http://lists.cpan.org/showlist.cgi?name=beginners-cgi many other perl project lists are here: lists.cpan.org Thank you. That is just what I needed. Mike -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://l

CGI Listserver

Can anybody recommend a listserver for CGI programming? After about 8 years of Perl programming, I'm just getting started with CGI. I did a search and find a bunch of dead lists and dead sites. Has CGI fallen out of favor? Mike Flannigan -- To unsubscribe, e-mail: [EMAIL PROTECTED

Re: RE: setting unix command through perl script

What ever happened to trimming the posts to a reasonable number of quoted messages? In the old days regulars would have made your life miserable for this kind of transgression. I guess since this is a beginners list we are much more tolerant nowadays. Mike On Thu, 17 Apr 2008, [EMAIL PROTEC

RE: WinXP command prompt window scrolls very slow

On Wed, 26 Dec 2007, [EMAIL PROTECTED] wrote: >>I just loaded WinXP on my wife's computer. I hate that OS. > >So? It works for billions of other people and companies, what does that say? >They are _all_ 'uninformed' and you are? >Relevance to the issue? > >>I just noticed that the command promp

WinXP command prompt window scrolls very slow

o XP, but just copying it over produces the same effect. I don't see any easy fixes, but wanted to throw it out to the group. Mike Flannigan -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

Re: A simple text or GUI-based menu script

e to find Proc::ProcessTable on ActiveState. I run Win2000, and I probably won't get this script to run. Mike Flannigan -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>

Re: Win32::NetAdmin::LocalGroupGetMembers

I just tried this on my Win2000 client machine and it gave the following: $VAR1 = 'Administrator'; $VAR2 = 'Mike Flannigan'; So it appeared to work to me. It made no sounds. Mike > Subject: Win32::NetAdmin::LocalGroupGetMembers > Date: Fri, 25 Jun 2004 17:40:

Re: regular expression

> Subject: regular expression > Date: Wed, 9 Jun 2004 18:46:30 -0500 (CDT) > From: Mandar Rahurkar <[EMAIL PROTECTED]> > CC: [EMAIL PROTECTED] > > Hi, >I am looking for URL's that end in .html OR .htm or / > > if($URL =~ /[.html$|.htm$|\/$]/) { > #do somthing > } > > whats wrong with the abov

Re: Regarding Text Widget in Perl/Tk

Ahhh. Not comparing apples to apples. That does make a difference. I need to get me a good Tk book and learn it proper, heh? Mike > Mike, > > That is because you are mixing threads. You pggybacked your issue on a thread > initiated by > Vinesh Vargese, concerning the Tk::Text widget, as s

Re: Regarding Text Widget in Perl/Tk

If I right click on the title bar, it gives "move", "size", "minimize", "maximize", "close". If I right click anywhere else, it doesn't do anything - produces no box. I don't recall hacking anything to do with that, but perhaps I did. Mike > Ah, but right clicking on the Text widget will--un

Re: Regarding Text Widget in Perl/Tk

tunate that copy and paste don't work > > in that TK box. > > If it is a Text widget, copy and paste will indeed work. Can you provide more > detail on > why you think it doesn't? I changed round2.pl to include "print "Hello World\n";" Now it's th

RE: Using compression on Win32 systems

due to version changes, but I'm not sure. I'm really surprised by the lack of examples on the web. I did happen to stumble across a solution - posted below. If you discover something cool with this module, please share with me. If you have further problems, feel free to contact me.

Re: Regarding Text Widget in Perl/Tk

d open(C, "'perl round2.pl' 2>&1 |") or warn $!; but that didn't work either. That "Got:" prompt isn't too cool, but I'm sure I'll learn how to turn that off later. Also, it's unfortunate that copy

Re: Simple question

> Subject: Simple question > Date: Fri, 8 Aug 2003 07:09:24 -0600 > From: "Trevor Morrison" <[EMAIL PROTECTED]> > To: <[EMAIL PROTECTED]> > > Hi, > > I am trying to compare two arrays to find common numbers in both. For the > numbers that are not common to both, I want to write them to a file for

Re: Comparing 2 lists

Shiping Wang wrote: > ### > > foreach my $element (keys %count) { > push @union, $element; > push @{ $count{$element} > 1 ? [EMAIL PROTECTED] : [EMAIL PROTECTED] }, > $element; > > } # you have declared

Re: Comparing 2 lists

re is apparently something wrong with: push my (@{ $count{$element} > 1 ? [EMAIL PROTECTED] : [EMAIL PROTECTED] }), $element; It gives the warning or error of: "Use of uninitialized value in numeric gt (>) at compare.pl line 12. After I fix this simple? problem, then I need to understand the code and get it to work right :-) Mike Flannigan -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: Search and Replace

Jeff 'japhy' Pinyan wrote: > On Jul 13, Mike Flannigan said: > > >> s/\|/h/g foreach @filecontents; > >> > > > >Works like a charm. I sure appreciate your help. > > > >It's going to take me a few years to figure out (ev

Re: Search and Replace

Tim Johnson wrote: > There's one caveat to be aware of with doing a "@array = " type > of file read. If you end up having to work with very large files (or you > don't have a whole lot of RAM to work with), you could be slowing down your > program, maybe drastically if you try to load the entir

Re: Search and Replace

> This should be: > > open (HANDLE, $listelem) or die "open: $listelem: $!"; > > That way if the open fails for any reason you'll get a sensible > error message. (And it avoids the race condition.) > Thank you. This is about the 6th version I have tried for this command, and I like this one

Search and Replace

OK, I'm a real newbie, but even I am ashamed to be asking this. I want to search for a vertical mark ( | ) and replace it with something else (h). That's all - nothing fancy. What am I doing wrong here: use strict; use warnings; my $listelem = "52101.txt"; #Open file in listelem if it exists if