On Tue, Sep 16, 2008 at 8:28 AM, cancer <[EMAIL PROTECTED]> wrote:
> Hi,
> I am using Perl on Linux server. I m writing a code which will tell
> us the Linux distro with version. For this the command is
>
> cat /etc/issue
>
> which is common for all the distributions of linux.
Slackware :-)
[
On Fri, May 23, 2008 at 12:15 AM, Alan C <[EMAIL PROTECTED]> wrote:
> On Thu, May 22, 2008 at 5:57 AM, Octavian Rasnita <[EMAIL PROTECTED]>
> wrote:
>
[ . . ]
>Next shows a block or lexical scope (mask does not happen) versus when in
the same scope (in global, not usin
On Thu, May 22, 2008 at 5:57 AM, Octavian Rasnita <[EMAIL PROTECTED]>
wrote:
> Hi,
>
> I've tried the following script and it works fine:
>
> use strict;
> my $text = 1;
> my $text = 2;
> print $text;
>
> Shouldn't perl disallow defining the $text variable a second time in the
> same script if usi
On Wed, Apr 16, 2008 at 11:58 PM, <[EMAIL PROTECTED]> wrote:
>
> Is there any mechanism where I can take the log of entire Perl script. I
> mean to say that I need the log of each and every step which I am doing
> in Perl script. That step may include
>
> 1: input from user
>
> 2: internal Perl sc
Thanks for the replies. I've added them to my searchable data.
My forgetfullness worsens as I get older.
I'd totally forgotten that I'd once done this with HTML::Strip
And I began reinventing the wheel the other day. Lynx too, forgot about
that (Slackware 12.0 right now).
Anyways, here's a mo
Hi,
I saw the doc for HTML::Parser. I looked at its hstrip program in the eg
folder but dunno how to strip a scalar instead of a file. I can strip a
file. But I want to strip a scalar. Any help appreciated.
As my code is currently, when ran, it prints text to STDOUT and the $source
scalar var
On Sunday 19 February 2006 12:56, Octavian Rasnita wrote:
[ . . ]
> The database I need to keep is not very very big, but too big for MySQL,
> and the most important thing is the speed of selections/updates.
[ . . ]
DB_File and BerkelyDB
are two Perl modules that use the embedded database which
Hi,
Perl 5.8.8 on Slackware 10.2
As to the libdb's: (the default for Slack 10.2) appears to be onboard 3
different versions of libdb (Sleepycat)
Ideas, suggestions to get it working?
How to tell if it's a Perl or a C init thing?
/usr/lib/perl5/5.8.8/i486-linux/auto/DB_File/DB_File.so doe
Joshua Lokken wrote:
[ . . ]
While your way is much easier and works well, I wonder why
my original syntax did not produce the desired result?
Your (next, below) original syntax does produce the desired result here
(tested). Win32 Activestate Perl 5.61 build 633
#!perl
print "Enter 5 of your fav
Hi,
I was wondering if this is a Unicode thing/issue--if there might be a
better solution. If, instead of the code enclosed below, there might be
a command line switch or an option I can use or set.
Win32 ActiveState
I've a text editor with capable to launch command line as well as
capture t
Hello,
It's my .* attempt I don't understand, seek help on. (seek/need
ability to either all files in dir opened or pattern search the files in
dir with only files that meet pattern opened)
(Win32 if that matters Win2k ActiveState 5.61 build 633) Next line is
from when the script worked ok
Jeff 'Japhy' Pinyan wrote:
On Aug 2, Alan C. said:
#!/perl/bin/perl -w
use strict;
#map & join from @ARGV into $pattern snipped
#!/perl/bin/perl -w
#Win32 d:\perl\bin\perl.exe
use strict;
@ARGV=qw/doc sort/;
my $pattern;
# next is the original it's without word boundary
Hi,
#!/perl/bin/perl -w
use strict;
#map & join from @ARGV into $pattern snipped
my $pattern='(?=.*doc)(?=.*sort)';
#print "$pattern";
#directory files foreach file to be searched snipped
if (s/^H=($pattern)/$1/io) {
print "$fil:$_" ;
}
#end
The above with the rest of my script finds doc
Zanardi2k3 wrote:
Questions about editors have been asked many times, but i'm going to be a
little more specific.
I am in a Windows environment, and i love NotaTab. It is one of the few
tools that makes me wonder how could i ever have carried on without it.
Only it doesn't do syntax highlightin
Panneer Selvan wrote:
Hi,
By this program key functions are execute after running the exe.. I want to execute the key funtions before completion of exe
use Win32::GuiTest qw(FindWindowLike GetWindowText
SetForegroundWindow SendKeys);
syste
Hi,
How, where to get started?
On Windows to have Perl search a text file and display all of the file
on STDOUT but the matched words to show in color.
I can do some regex. But I haven't a clue about how to color matched
words or if it can be done on Windows. I know the Vim editor can do
th
Didn't find much on it in my ActiveState module. But applicable here:
http://search.cpan.org/author/SHANCOCK/Perl-Tidy-20021130/docs/tutorial.pod
Has/installed batch file into perl\bin folder. Got it working! Thanks!
--
Alan.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional comma
When, as follows, use a script that draws upon Perl::Tidy
Win 2k. (using here doc in the script) The $source gets printed on
stdout just fine the block comes out indented.
But, what's between the EOM, I put into c:\pltidytst.pl
And I need howto help for: 1. as I not yet get it to pull from that
Hello,
I figured out how to substitute. But I need howto help as I didn't know
how to print out my desired matched items. Thanks!
Instead of the substitution, I want to match and keep. In other words,
I want to extract and keep/print up to the blank line
so that the output will be:
semeste
Kevin Old wrote:
have noticed that the perldoc command isn't availableI've looked for
Doesn't that one use man ?
man html::parser
etc.
--
Alan.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Rob Dixon wrote:
"Alan C." <[EMAIL PROTECTED]> wrote in message
[EMAIL PROTECTED]">news:[EMAIL PROTECTED]...
Rob Dixon wrote:
my $last = undef;
while (<>)
{
next unless defined $last;
chomp $last unless /^\./;
print $last
Rob Dixon wrote:
my $last = undef;
while (<>)
{
next unless defined $last;
chomp $last unless /^\./;
print $last;
} continue {
$last = $_;
}
print $last;
Your code works super for the job!
I had thought of chomp and unless. But I'm too
John W. Krahn wrote:
"Alan C." wrote:
Here is one way to do it:
#!/perl/bin/perl -w
use strict;
my $text = do { local $/; <> };
$text =~ s/\n(?!\.|\z)/ /g;
print $text;
Your code does the job just super! Thanks!
The (|) parenthesis "group" with left side | righ
Hello,
It's now a previously formatted text block with line breaks at every 70
characters width.
And the block's first line begins with a leading period or dot as well
as approximately every third line thereafter begins with a leading
period or dot.
How do I rid the block of line breaks on ev
Hello,
This must be easy. But I've not yet enough experience with Perl's control
structures.
perl mysort.pl infile.txt > outfile.txt
The stack of numbers with colons below reside within infile.txt
120:2
126:2
13:15
140:3
14:3
141:3
14:3
15:11
My task or goal is to get each of them lines over i
Hello,
In contrast to bookmarked web site pages, I may want ability instead to
store these urls in some sort of a text file or files or database of some
sorts. I'd also use a keyword(s) associated with each url.
My idea is, for my more frequently used urls, to have an organized index
that I can
Hello,
#!/perl/bin/perl -w
# print ASCII from HTML from a URL
use LWP::Simple;
use HTML::Parse;
use HTML::FormatText;
my ($html, $ascii);
$html =
get("http://www.wrh.noaa.gov/cgi-bin/Sacramento/afd?SFOZFPSTO";);
defined $html
or
Hi and thanks much!
Success!! Learning occurred. Here's what I tinkered with and got to work
so far.
my $output = qx(graburl
http://www.wrh.noaa.gov/cgi-bin/Sacramento/afd?SFOZFPSTO);
open MYWTHR, ">myweathr"
or die "Cannot create mywthr_txt: $!";
print MYWTHR "$output";
#end--
(gra
Hi,
I've a Win 2K command console executable. Once this .exe is launched, its
output goes to STDOUT. And, this output consists of text and html, in
size, just about the amount for a small to medium web page. Also want to
strip and discard the html from the output so as to capture only the t
Hi,
As a (motivated) beginner with some the basics I can write small text
manipulation scripts and also doing some of up to including intermediate
cgi Perl localhost Apache sometimes also on Unix server
Thus I hope I within scope this list
What I seek:
ability use perl for purpose/task as a
wrote:
>I believe that is not possible. A server side script can't launch a
>client's browser.
>
>Alan C. wrote:
>
>>Hi,
>>Win 2k with MSIE web browser
>>Whether or not my web browser is already been launched/opened
>>Can a Perl script do that task? O
Hi,
Win 2k with MSIE web browser
Whether or not my web browser is already been launched/opened
Can a Perl script do that task? Or a perl module?
Able to do without bringing up a command prompt as part of the process?
I was wonder if a script or module already exist.
Or, what would such writ
Amongst others, 10 weeks basic to advanced, how to generate an html page, a
guestbook as well as add/append entries to that same html page.
http://perl.about.com/library/p101/bl_p101class.htm
At 01:59 PM 1/28/2002 -0500, you wrote:
>Hi all,
>
>Working on a CGI script that will allow me to ta
Hi,
http://www.delphiforums.com/
I originally discovered the follows site from being a member at above site.
I'm a member at above of which I can first log on there which then entitles
me to freely travel/navigate follows/next site
without logged on to above, membership (free) perl.about.com
Subject: RE: CGI perl html urgent
Hi,
Different? -- I think of it as a way when i need larger amounts of text or
html tags or larger amounts of whatever.
But perhaps all it is is part of Perl's characteristic of "there's more
than one way to do it" (tmtowtdi)
I think it's called a here doc
35 matches
Mail list logo