Re: How can I execute linux commands on terminal and catch the results?

Hello Andrew, thanks for your answer. I tried to do this way: *#!/usr/bin/perl -w $res = qx/whoami/; print $res; print "-\n"; if ($res eq "daniel"){ print "Welcome, ".$res." how are you?.\n"; }else{ print "Your name isn&#

Re: How can I execute linux commands on terminal and catch the results?

Thanks for all! 2008/10/1 Andrew Smith <[EMAIL PROTECTED]> > Hi Daniel > You were caught by the trailing "\n" as John Krahn pointed out. insert a > chomp $res; after your qx line or put a chomp around the qx statement. > If you were to change your comparison to >

Re: HOW-TO of the Month Club (end Of MARCH Edition)

er manage scope issues, not to evade warnings. This is not to say all variables need to be 'my' scoped, but if they aren't it is probably best to just say why they aren't. Daniel T. Staal (Note: I like the How-Tos idea, just question the

Re: Project Advice Wanted

HTML::* modules. 2) You want the DBI module, and its assorted submodules... 3) I think you are looking for HTML::Template here, but otherwise there is Text::Template, ZM::Template, Apache::Template... Check out http://search.cpan.org/ for more details on all of the above modules. ;-) Dan

Regexp match question !

Hi everybody, I am a beginner of programming ( so I am a beginner of perl programming too :-) ) and I have this very basic problem but cannot handle it. I'm trying to match only a one single digit and wrote this code: use strict; my $number = 11; # two-digit number if ( $number =~ /\d{1}\b/ )

Re: AW: Regexp match question !

Schell, Holger wrote: Hi, Maybe not the best solution but try something like this \b[0-9]\b Means that there are boundaries before and after and in the middle should be a one digitnumber \b\d\b works similar. ? is searching step by step, so this means: $number = 11; it starts with searching for a

Re: using strict

ine = ) ) { chomp ($line); my @tsm = ; foreach $_ (@tsm) { print $_; } } close (CRITICALSERVERS); } I think that will get you going. Daniel T. Staal ---

Re: Strings with extended characters

way to do this. --As for the rest, it is mine. I'm sure there is a smart way, but here's a dumb idea: my @characters = unpack('U*', $string); for @characters { if $_ > $max_Char_Value { # Do something } else # Do somet

Re: How to determine if STDIN has piped data?

d you don't want, but now you can't say you don't know how to build them.) Daniel T. Staal --- This email copyright the author. Unless otherwise noted, you are expressly allowed to retransmit, quote, or otherwise use the con

Re: Avoiding using temporary files

5.8 can open a scalar as a filehandle. Do your writing, the close the filehandle and use the scalar directly. Not printing at all would be best though, if the code can afford it. That is, if can afford to hold the whole file in memory... (Which both of these do.) Daniel T. Staal

Re: Avoiding using temporary files

use it is clearer what is going on. If memory is ever a problem you would want to actually print to a file, then read it back in. Daniel T. Staal --- This email copyright the author. Unless otherwise noted, you are expressly allowed to

Re: perl +sendmail

a QueueDirectory. Sounds like it didn't deliver your mail since it has no place to deliver it *to*. I'd check the Sendmail docs. Daniel T. Staal --- This email copyright the author. Unless otherwise noted, you are exp

Re: perl mysql question

Widgets-D| 10 Widgets-E| 25 Any ideas? --As for the rest, it is mine. Sure: create a hash, using field one as the key, and *add* (not insert) the count to the value of each element of the hash. Then store the hash in the database. Daniel T. Staal

RE: perl mysql question

--As for the rest, it is mine. Replace: $table{ "$array[1]" } = "$array[3]"; with: $table{ $array[1] } += $array[3]; or (equivalent, but more clear): $table{ $array[1] } = $table{ $array[1] } + $array[3]; (Note that you don't need the quotes in the first line.) Daniel T. Staal -

Re: do problem

rrent value in the scripts, i.e. although --As for the rest, it is mine. Just out of curiosity: would using HTML::Template be terrible overkill? This seems to be the type of thing it was designed for... Daniel T. Staal --- This email copy

Re: A MySQL Question

--As of Monday, May 24, 2004 8:43 AM +0600, LRMK is alleged to have said: By the way is PostgreSQL free and if yes where can I get a copy to practise myself. --As for the rest, it is mine. Yes: <http://www.postgresql.org/> Daniel T.

Re: need help

this .. --As for the rest, it is mine. What have you tried? For a start, I'd look at File::Find and File::Temp. Daniel T. Staal --- This email copyright the author. Unless otherwise noted, you are expressly allowed to retransmit, quot

Calling subroutines from another file

tell it to look outside the package for functions? -- Daniel Kasak IT Developer NUS Consulting Group Level 5, 77 Pacific Highway North Sydney, NSW, Australia 2060 T: (+61) 2 9922-7676 / F: (+61) 2 9922 7989 email: [EMAIL PROTECTED] website: http://www.nusconsulting.com.au -- To unsubscribe, e-mail:

Re: Calling subroutines from another file

d for more info on writing modules. HTH, Charles K. Clarkson Thanks. Much appreciated :) -- Daniel Kasak IT Developer NUS Consulting Group Level 5, 77 Pacific Highway North Sydney, NSW, Australia 2060 T: (+61) 2 9922-7676 / F: (+61) 2 9922 7989 email: [EMAIL PROTECTED] website: http://www.nusconsult

Re: Changing user in perl

-uid files over a browser interface though, or even update them. That's just playing with fire... Daniel T. Staal --- This email copyright the author. Unless otherwise noted, you are expressly allowed to retransmit, quote, or othe

Re: MS Word to PDF

ngs that do this ). More to the point, however, is convincing people to covert their Word documents to OpenOffice's XML format. -- Daniel Kasak IT Developer NUS Consulting Group Level 5, 77 Pacific Highway North Sydney, NSW, Australia 2060 T: (+61) 2 9922-7676 / F: (+61) 2 9922 7989 email: [

Printing hash of hashes

Hello All, I need to print my hash of hashes. For example... %HoH = ( flintstones => { lead => "fred", pal => "barney", }, jetsons => { lead => "george", wife => "jane",

Execute a sub: $sub

Hi all. I have an object that I want to have execute some code that it gets told about when it's constructed. How do I go about that? ie: $self->{some_code_to_execute} will either have the name of a sub, or a reference to a sub, or something. Dan -- Daniel Kasak IT Developer NUS Consulti

Printing outside of foreach...

Hello again, The folling code takes some data from the Australian Stock Exchage website. The problem I am having is that I need to be able to access the hash of the hash outside of the foreach statement. So in other words I would like to be able to access areas within the hash %stock_hash any wh

Printing hash outside of foreach loop

Hi Wiggins, Thank you for your reply. I will go and use the Finance::Quote::ASX module. For now though this problem is really bugging me and for my own sake I would like to get it to work. I have declared all my variables and am using warnings and strict. Unfortunarly I am still only able to print

Assigning a variable to hash keys and values

Hello All, I currently have a hash of a hash... > %HoH = ( > Key1=> { > Apple => "Green", > Banna => "Yellow", > }, > Key2=> { > Carrot=> "Orange", > Tomoatoe => "Red", > }

Re: Favorite email parser?

best. :) I've been just doing some research into this for a project I'm working on, and have been impressed by the Mail::Box module set. Of course, ask me in a couple weeks and my answer may change... But generally that module set looks to be able to do anything you would want to do with

Re: PERL and Mobile Devices.

--As of Tuesday, August 10, 2004 12:54 PM -0700, Joe Echavarria is alleged to have said: can i write applications with perl for mobile devices , --As for the rest, it is mine. Define 'mobile devices'... Daniel T. Staal ---

Re: how to encrypt my perl script

re a variety of ways to make it hard. Nothing that can make it impossible. Daniel T. Staal --- This email copyright the author. Unless otherwise noted, you are expressly allowed to retransmit, quote, or otherwise use the contents for

Re: Could this be made shorter and cleaner?

answer... You honestly don't want to get into it. You start devolving into arguments over what is 'scripting' versus what is 'programming', and from there what is best... To me, scripting is a sub-class of programming anyway, so why should it mat

RE: Array - how to access and display??

--As of Wednesday, September 1, 2004 8:45 PM -0500, Jerry Preston is alleged to have said: This works!! print "history $history[ 0 ]{ version }\n"; --As for the rest, it is mine. Great! Do you know *why*? (Note: You are not only accessing an array...) Danie

Re: Leading zero in a string

Strip out anything that isn't valid, and add the zero when you need it. (I suggest sprintf, personally.) Daniel T. Staal --- This email copyright the author. Unless otherwise noted, you are expressly allowed to retransmit, quote, or

Re: perl's equivalent for jpgraph (www.aditus.nu/jpgraph/)

Pretty soon I'm going to need a graphing solution as well... -- Daniel Kasak IT Developer NUS Consulting Group Level 5, 77 Pacific Highway North Sydney, NSW, Australia 2060 T: (+61) 2 9922-7676 / F: (+61) 2 9922 7989 email: [EMAIL PROTECTED] website: http://www.nusconsulting.com.au -- To

Recommend a graphing module?

G::TT::Graph ( which I unfortunately haven't been able to compile yet ). And yes I realise I can search on cpan, eg: http://search.cpan.org/modlist/Graphics but I'm asking for people's opinion based on their experience. Thanks :) Dan -- Daniel Kasak IT Developer NUS Consulting Grou

Image Creation: labels

PDF::API2, but I can't even figure out if it does what I want - the documentation is a little nonexistant. So should I use GD? -- Daniel Kasak IT Developer NUS Consulting Group Level 5, 77 Pacific Highway North Sydney, NSW, Australia 2060 T: (+61) 2 9922-7676 / F: (+61) 2 9922 7989 email

Re: Image Creation: labels

zentara wrote: On Thu, 13 Jan 2005 14:20:34 +1100, [EMAIL PROTECTED] (Daniel Kasak) wrote: I'm hunting for a method of creating labels under Linux. I've already looked at everything on freshmeat.net that came up when I searched for 'labels'. None of them cut it. Requ

Re: Image Creation: labels

Randy W. Sims wrote: <http://search.cpan.org/dist/PostScript-MailLabels/> Too mailing-specific or use some of the PostScript::* modules to roll your own. Now *THAT* is what I was after. Postscript::Simple seems to do everything I want, and *very* easily. Thanks :) -- Daniel Kasak IT Develop

Re: Perl print command from browser

t sort of printer is it? -- Daniel Kasak IT Developer NUS Consulting Group Level 5, 77 Pacific Highway North Sydney, NSW, Australia 2060 T: (+61) 2 9922-7676 / F: (+61) 2 9922 7989 email: [EMAIL PROTECTED] website: http://www.nusconsulting.com.au -- To unsubscribe, e-mail: [EMAIL PROTECTED] For ad

Re: problem with installing DBD::mysql module

rding this. I'm not sure what effect this would have if the header files are more recent than the server on your system ... assuming there is a server on your system. -- Daniel Kasak IT Developer NUS Consulting Group Level 5, 77 Pacific Highway North Sydney, NSW, Australia 2060 T: (+61) 2 9922-7

Detect platform

How do I detect what platform I'm running from inside a Perl script? -- Daniel Kasak IT Developer NUS Consulting Group Level 5, 77 Pacific Highway North Sydney, NSW, Australia 2060 T: (+61) 2 9922-7676 / F: (+61) 2 9922 7989 email: [EMAIL PROTECTED] website: http://www.nusconsulting.com.au

Re: Detect platform

Chris Devers wrote: On Wed, 16 Feb 2005, Tim Johnson wrote: On Wed, 16 Feb 2005, Daniel Kasak wrote: How do I detect what platform I'm running from inside a Perl script? Check out the $^O variable. ...but be careful in writing code that matches it: Under Mac OSX: $ per

Execute application with a space in it's path

\\Adobe\\Acroba~1\\Reader\\AcroRd32 C:\\PDFs\\test.pdf"); -- Daniel Kasak IT Developer NUS Consulting Group Level 5, 77 Pacific Highway North Sydney, NSW, Australia 2060 T: (+61) 2 9922-7676 / F: (+61) 2 9922 7989 email: [EMAIL PROTECTED] website: http://www.nusconsulting.com.au -- To unsubscribe, e-

Re: PDF creation

ipt, pdf or dvi output? I'm thinking of biting the bullet and trying to write one, but I think it would be a little over my head at the moment. If I must, though, I will try. -- Daniel Kasak IT Developer NUS Consulting Group Level 5, 77 Pacific Highway North Sydney, NSW, Australia 2060 T: (

Re: Execute application with a space in it's path

ke this: system("\"C:\\Program Files\\Adobe\\Acrobat 7.0\\Reader\\AcroRd32.exe\" C:\\PDFs\\test.pdf"); That works. Thanks :) -- Daniel Kasak IT Developer NUS Consulting Group Level 5, 77 Pacific Highway North Sydney, NSW, Australia 2060 T: (+61) 2 9922-7676 / F: (+61) 2 9922 798

PDF::API2 - text over a rectangle

and run the code, I get the correct text ( coming from $self->{report}->{header}->{text} ). Why does my text only appear if I *don't* create the blue box? Is it being rendered underneath the box or something? I was under the impression that anything you render gets placed on *top

Re: :API2 - text over a rectangle

Charles K. Clarkson wrote: Daniel Kasak <mailto:[EMAIL PROTECTED]> wrote: : Hi all. : : Despite making some decent progress in other areas, I'm banging my : head against a brick wall on something simple: rendering text over a : solid rectange. You didn't provide enou

Re: :API2 - text over a rectangle

Jay Savage wrote: Also, try calling ->gfx with a positive value, which should cause it to prepend and possibly render first. This was the issue. Replacing: my $blue_box = $page->gfx; with: my $blue_box = $page->gfx(1); causes the gfx object to get rendered 1st. Thanks :) -- Daniel

Use of uninitialized value

ere any way to prevent 'Use of uninitialized value' warnings without doing an extra test as above ( and still keeping warnings turned on )? Thanks :) -- Daniel Kasak IT Developer NUS Consulting Group Level 5, 77 Pacific Highway North Sydney, NSW, Australia 2060 T: (+61) 2 9922-7676 /

HTML parsing

Hi all, I'm brand new to Perl, and have just a little programming background. I was tasked with parsing a set of .html files in order to extract the data contained within some terribly formatted tables. Here is a sample of what I have. Data to be extracted DATA DATA DATA Need this too

Re: Keeping format when printing

hen you'll have to convert from pdf to ps, and finally print the ps. Or you could output to another format ( ps? ). I'm currently mucking around with PDF::API2 for all output that I know in advance has to be printed. The documentation is a little non-existant, but it works quite well. --

Re: Many SQL clauses executing

hod able to perform many SQL clauses at all? If no what > method or function should I use to perform this? Current stable versions of MySQL don't support multiple statements in this way. I believe support for this will be added in 5.x, but it *could* be in 4.1.x. Either way, you won't be abl

Re: Creating reports ??

Michael Gale wrote: Hello, I am currently googling for this but ... I want to know what people think or have used to create reports in perl. Maybe creating some kind of graph or an excell report ? I'm currently working on a text-based reporting module. It basically does what MS Access' repor

Re: PDF::API2

PDF::API2 object and work with it directly. If you're interested, I can email you with my unfinished PDF::ReportWriter ... it's *almost* ready for an initial release. I'm pondering whether I should remove the dodgy hard-coded stuff or not. -- Daniel Kasak IT Developer NUS Consulting

Script that spans multiple files

variables will be visible )? Thanks :) -- Daniel Kasak IT Developer NUS Consulting Group Level 5, 77 Pacific Highway North Sydney, NSW, Australia 2060 T: (+61) 2 9922-7676 / F: (+61) 2 9922 7989 email: [EMAIL PROTECTED] website: http://www.nusconsulting.com.au -- To unsubscribe, e-mail: [EMAIL

Re: Script that spans multiple files

Charles K. Clarkson wrote: >Daniel Kasak <mailto:[EMAIL PROTECTED]> wrote: >: >: I have a large script ( 6000 lines ) that I'd like to break into >: logical units. Is there a way I can tell perl to 'append' a list >: of files into 1 script so that I can ca

Re: PDF::ReportWriter not writing headers on first page

nt_size => 12, >align => "left", >}, > >and so on. > >The headers are displayed on the *second* page, but not on the first. > > I fixed an issue with the 1st set of headers not showing in the 2nd release, which is available via cpan ( and my we

Re: Favorite Packages for Platform Neutral GUI?

Siegfried Heintze wrote: I get the impression that there are several alternatives to use=ing Tk for writing OS neutral GUI programs in Perl. Can anyone point me to a discussion that might help me choose one? I'll give my vote to Gtk2 any day. To start with, Tk looks like barf. It really, really,

Re: Favorite Packages for Platform Neutral GUI?

Siegfried Heintze wrote: Wow! Thanks for the enthusiastic responses! Well I'm a C++ guy so GTK* and WxWindows look good. But is anyone using these on ActiveState Perl? Is there some other perl for windows that I should be using for GUI? Siegfried ActiveState Perl is fine for Gtk2-Perl. At least

Re: Advise me? Seeking GUI toolkit...

different story. Users need to be running an X server, which some object to, but isn't all that bad. You then need to install Gtk2. I've tried to do this via 'darwin ports', and have not had a great deal of success. However one of the Perl-Gtk2 developers assures me that if y

Re: Advise me? Seeking GUI toolkit...

partial record 'slices' ( or 'pages' as I suppose I should call them ) to reduce bandwidth and memory requirements ... so instead of fetching all records returned by a query, it will select the first 100 ( default, but you can change it ) records, and then only get the next 10

Windows: Fork and run a process in the background

Greetings. I'd like to trigger an application to open ( Acrobat Reader ), and *not* freeze my perl app while it's open. Under Linux, I do: system ( "evince /path/to/pdf.pdf &" ); The ampersand does what I need. This doesn't work under Windows. Is there a cheap &a

Re: Windows: Fork and run a process in the background

Timothy Johnson wrote: > Try this: > > system( "start evince /path/to/pdf.pdf" ); > > Both cheap and nasty. > That does it. Thanks :) -- Daniel Kasak IT Developer NUS Consulting Group Level 5, 77 Pacific Highway North Sydney, NSW, Australia 2060 T: (+61) 2

Detecting line terminators in a CSV file

Dialogs::ErrorMsg->new_and_run( title => "Please get Dan ...", text=> "modules::mysql::import failed to find EOL sequence!" ); return FALSE; } } -- Daniel Kasak IT D

Re: Detecting line terminators in a CSV file

); > return FALSE; > }; > It's working on my system as-is. I'll check out that precedence thing when I get some spare time. >> if ( substr( $fieldnames, length( $fieldnames ) -2, 2 ) eq "\r\n" ) { >> > > You don't have to call the

Re: Detecting line terminators in a CSV file

John W. Krahn wrote: > Daniel Kasak wrote: > >> John W. Krahn wrote: >> >>> perldoc -f binmode >>> >> binmode is what I was after - thanks :) >> > > Then don't forget to use the correct characters for this: "\0

PDF::API2 and content index

Hi all. Does anyone know if it's possible to create a content index with PDF::API2, so people viewing the PDF can click in the index and go straight to the corresponding page of the PDF document? -- Daniel Kasak IT Developer NUS Consulting Group Level 5, 77 Pacific Highway North Sydney

split and grouping in regexp

ymmdd; it works for dates separated by dashes, and if I do: my ( $, $mm, $dd ) = split /\//, $mmdd; it works for dates separted by slashes. Why can't I do both at the same time? -- Daniel Kasak IT Developer NUS Consulting Group Level 5, 77 Pacific Highway North Sydney, NSW, Australi

Re: Free PERL Editor

Suja Emmanuel wrote: Hi all, Could you please suggest me any good PERL editor which is available in open source tools. I have tried 'EngineSite Perl Editor -LITE' and 'PerlExpress' which I am not comfortable with. Kindly refer me some good bug free tools. Eclipse IDE with the

GD::Graph and alpha blending

been able to find any examples ( googled, honest ). Has anyone done alpha blending in GD::Graph, in particular inside bars? Seen any example code around? -- Daniel Kasak IT Developer NUS Consulting Group Level 5, 77 Pacific Highway North Sydney, NSW, Australia 2060 T: (+61) 2 9922-7676 / F: (+61

Re: pdf to excel

oryann9 wrote: I have a scanned PDF file and I want to convert its data so I can store it in an xls file. What module(s) do you recommened? I saw File::Extract::PDF ? If you've scanned it, chances are the PDF doesn't contain any text that you can extract. It will just be 1 image per p

Any Perl graphing libraries with alpha blending?

I'm after a Perl graphing library that includes alpha blending support. I've checked out GD::Graph, but it *doesn't* support alpha blending. Are there any options? I know of jpgraph for PHP ( which is excellent for open-source stuff, but the commercial license is too expensive

Re: perl6::form simple reporting

Ken Foskey wrote: > I have a script that takes an sql and formats into a report, simple > stuff. > > I have a product that when it changes I want a sub heading. I have > coded this. > > if( $prior_product ne $sql_product ) { > print form... > $prior_product = $sql_product; > } > > Is there

ExtUtils::MakeMaker and packaging things

Hi all. I'm writing an app in Gtk2-Perl. I want to include things like glade XML files, and images. How do I go about that? I would like to be able to do something like create an app folder: /usr/share/some_application and dump stuff in there. Can I do that? How? Dan -- To unsubscribe, e-mail

Home directory

Hi all. How do I, inside Perl, get the path of the home directory? I assume if I can do this, it will only work under Linux / Unix? -- Daniel Kasak IT Developer NUS Consulting Group Level 5, 77 Pacific Highway North Sydney, NSW, Australia 2060 T: (+61) 2 9922-7676 / F: (+61) 2 9922 7989 email

Re: create gui

ns ( eg dial-up ) - report builder exports direct to PDF - big plans for the next 12 months :) See the screenshots / examples on my webpage for more details ... -- Daniel Kasak IT Developer NUS Consulting Group Level 5, 77 Pacific Highway North Sydney, NSW, Australia 2060 T: (+61) 2 9922-7676 / F: (+

Simple messaging program.

;t get myself around it. How to I make two or more clients have their lines printed simultaneously? Can someone point me in the right direction? Much appreciated, ~ Daniel.

Simple messaging program.

/15 Uri Guttman > >>>>> "t" == terry writes: > > t> 于 2011-3-16 8:31, Daniel Calvo 写道: > >> while (<$fh>) { > >> print; > >> } > > > t> For the first look, you shouldn't be using <> for receivin

Re[2]: can't print input argument

a look in perldoc perlrun, there's all sorts of command-line switches that can be used. ta, daniel > but again, I don't use the command-line all that much. > -Original Message- > From: Booher Timothy B 1stLt AFRL/MNAC > [mailto:[EMAIL PROTECTED]] > Sent: Tuesd

HTML::

t -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Possible outcomes

Hey all, I have some code (below) that will strip data from a HTML page and go ahead and display information that I need. The proble I am facing is that the data has 4 possible out comes derived from user input. Basically I would like to start on 2 possible out comes. If the user is to have

10 Digits, no more no less

Hey all, Just wondering if Perl is able to could how many digits there is in a variable. Basically I want a user to be only able to enter 10 digits no more no less. Is there a way perl can count this variable and with a little if/else statment I can display the result. Kind regards, Dan -- T

HTML::TableExtract

Hi all, At the moment I am working with HTML::TableExtract. I must say that I am having alot of fun with it and most of it is working really well. What I am looking for is some ideas on how I can go about the following... Basically I have my own CGI/Perl page that a user enters some credentials

Matching a variable against nothing

Hey all, Just wondering how I check if a variable contains nothing or not. I thought it was something like the following... if ( $string eq '' ) { print "String contains nothing"; } else { print "The string contains the following: $string"; } Is this correct? Dan -- To unsubscribe, e-mai

Stripping words from a string

Hey all, Just wondering how I would go about stripping words from a string. If I have a string that has the following... $string = "Hello world how are you?"; How would I go about stripping the words 'how' and 'Hello' ignoring case each time? Would it go something like the following... $stri

Splitting variable...

Hey all, I am working with a variable at the moment where I want it to be split at every 'space' such as ... $string = "the quick brown fox"; How would I go about doing this? Would I do something like the following... @line = split/\s+/, $string; $line[0] = the $line[1] = quick $line[2] = br

RE: Splitting variable...

ursday, 21 February 2002 10:40 AM To: Daniel Falkenberg; [EMAIL PROTECTED] Subject: Re: Splitting variable... What you are doing is correct. -paresh. At 10:20 AM 2/21/2002 +1030, Daniel Falkenberg wrote: >Hey all, > >I am working with a variable at the moment where I want it to be spl

Get rid of digits...

Hey all, Just wondering what my best way would be to go about stripping all digits from my string. So far I have the follwoing... $string = "08 852365 21 Hello world!"; $string =~ s/[.*\d\s]//g; What does this do exactly? Regards, Dan -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additi

Re: perldoc manual

found for "array". perldoc list ->> No documentation found for "list". perldoc -f push -- Best Regards, Daniel[EMAIL PROTECTED] -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Opposite of $respose->is_success

Hey all, Just wondering if any one know what the oposite of $response->is_success in the code below? I have tried $response->is_fail and $response->is_failure. I have also RTFM but I can't find anywhere what the opposite is. What I essentially want to do is if the site or page ($inputsite) can

Finding numbers ONLY in a variable

hi again all, Sorry to keep approaching you with my regex problems, but I really havn't had time to read up on them yet. If I have a variable... $var = "dfasdf"; Is it possible to get a regex to say ... "hang on I only want numerals in my variable. I am now going to print an error :)" if ( $

Activer Perl Modules

Just wondering if any one has seen this error before when installing a Active Perl Module. I have RTFM. I have run... c:\ppm then... PPM>install HTML-TableExtract.ppd but then I recieve the following error... Error installing package 'HTML-TableExtract.ppd': Error reading ../MSWin32-x86-mu

Allow only letters and numbers?

Hello List, The code below of coarse will count all characters in the string $string $string = "4556jhkl"; $count = $string =~ tr/a-zA-Z0-9//; How would I go about only allowing numbers and letters of the alpahbet? if ( $string =~ /\dw/)) { print "Only letters and numbers allowed: NO SPECIA

Netscape or Perl error?

Hi All, I am just testing my Perl CGI script on Netscape browser at the moment and I am getting a weird error occur. I can execute my script fine but when I go to use a link in the script such as... http://mydomain.com/cgi-bin/script?words=test&action=check_data In the URL bar of Netscape I ge

What would take care of this?...

Hey All, Just wondering how I would go about extracting all the data from heading 1 (h1) in the following HTML code. I figured I could have used HTML::TableExtract but then I realized ( :) ) there are not tables in the following HTML. Would I now have to go ahead and use HTML::parser or somethi

RE: Netscape or Perl error?

t least my script is *finally* cross platform :). Thx, Dan -Original Message- From: Dave Benware [mailto:[EMAIL PROTECTED]] Sent: Friday, 22 February 2002 4:22 PM To: Beginners perl Subject: Re: Netscape or Perl error? Daniel Falkenberg wrote: > > Hi All, > > I am ju

RE: What would take care of this?...

ontent = $address; $p = HTML::TokeParser->new(shift||$content); if ($p->get_tag("title")) { my $title = $p->get_trimmed_text; print "Title: $title\n"; } Can any one see anything wrong with this? Thx, Dan -Original Message- From: Chris Ball [mai

HTML::TokeParser

Hello All, Is it possible for HTML::TokeParser to be able to work like HTML::TreeBuilder. I don't want to have to download the webpage I just want to be able to view its' HTML content and then extract the data from there. If this isn't possible what would be my best bet for downloading the enti

Still can't extract data using HTML::TokeParser

($content) || die "Can't open: $!"; while ($stream->get_tag("h1")) { $data = get_trimmed_text("/h1");} Thx, Dan -Original Message- From: Chris Ball [mailto:[EMAIL PROTECTED]] Sent: Friday, 22 February 2002 9:49 PM To: Daniel Falkenberg Cc: [E

Getting code to work on a windows box

Hi All, The code below works fine on a Unix box but for some reason it doesn't work on a Windows box. My code compiles ok on the Windows box but when I go to run it the code never actually downloads the WWW page. Is there something I have to do to be able to use this on a Windows box? ___START

Writing file to Windows

Hey All, Is there any reason why I can't seem to get... LWP::Simple::is_success(LWP::Simple::getstore($address, $html_file) to write to a file. I have used the exact same code on a Linux box but when I go to run it on a Windows box it doesn't seem to download it and save it to a dir? Is this

<    1   2   3   4   5   6   7   >