> -Original Message-
> From: Blackburn, David W [mailto:[EMAIL PROTECTED]]
> Subject: Sudoers Regex
>
> Hi
Hello.
>
> I am trying to parse a string of text from a sudoers file,
> what I am trying
> to get out is the HOSTCLUSTER name and the hosts.
>
> Host_Alias HOSTCLUSTER = h
> -Original Message-
> From: richard noel fell [mailto:[EMAIL PROTECTED]]
> Subject: problem with directory listing
>
> Below is sample code that does not work as I intend, the
> intention being
> to list all the sub-directories in a given directory.
>
> #!/usr/local/ActivePerl-5.6/bin/
> -Original Message-
> From: Ahmed Moustafa [mailto:[EMAIL PROTECTED]]
> Subject: regular expression to get a file extension
>
> I had the following regular expression to get the extension
> from a file
> name:
>
>
> $extension = $filename;
> $extension =~ s/(^.+\.)([^\.]+)$/$2/;
>
>
> -Original Message-
> From: Teresa Raymond [mailto:[EMAIL PROTECTED]]
> Subject: regex excluding \w.\w\w\w.\w
>
> I'm trying to figure out how to exclude upload files with 2 periods
> at the end (b/c of that virus which I forgot the name of, maybe
> nimba?) Anyhow, this is what I have
> -Original Message-
> From: Gabby Dizon [mailto:[EMAIL PROTECTED]]
> Subject: regex help
>
> hello list friends,
Hello.
>
> hope you can help me with my problem. here it is:
>
> i have a date string formatted this way: $date = "Apr. 02, 2002"
> i want to capture the "Apr" (without th
> -Original Message-
> From: Michael Stearman [mailto:[EMAIL PROTECTED]]
> Subject: Re: Creating variables of a string
>
> Right now it is not working and I was wondering if I sent the
> code maybe
> someone with more experience with this will see the problem.
> I am very new
> to th
> -Original Message-
> From: David Samuelsson (PAC) [mailto:[EMAIL PROTECTED]]
> Subject: get full name of $user in NT?
>
>
> Is there anyway off getting the full name from an remote
> user? that is, i know the persons log on sign, say "ROMI"
>
> full name is "Robert Mitchum" accordin
> -Original Message-
> From: Matthew Harrison [mailto:[EMAIL PROTECTED]]
> Subject: callin subs
>
> i have defined a sub using
>
> sub mysubname{
> code here
> }
>
> but how do i call it? i have tried just having the name but
> that doesn't
> work.
>
> --
> Matthew Harrison
m
> -Original Message-
> From: Perl CosmicVoid [mailto:[EMAIL PROTECTED]]
> Subject: RE: perl infant stage..
>
> Hi!
>
> Ive got two different Perl icons now.
> One Big Perl and another a small perl against a paper
> backdrop..
>
> the MSDOS program does run, However its a split second
>
> -Original Message-
> From: John W. Krahn [mailto:[EMAIL PROTECTED]]
> Subject: Re: "Use of uninitialized value" error message
>
> Jason Larson wrote:
> >
> > I'm still new to Perl myself, so I can't tell you exactly
> what's h
**The following information is primarily just an FYI**
> -Original Message-
> From: Jenda Krynicky [mailto:[EMAIL PROTECTED]]
> Subject: RE: Problem with EXE created by PerlApp
>
> From: Jason Larson <[EMAIL PROTECTED]>
> > > Sorry I don
> -Original Message-
> From: Nikola Janceski [mailto:[EMAIL PROTECTED]]
> Subject: the scope of BEGIN {}
>
>
> BEGIN {
> if ($^O =~ /^(ms)?(win|dos)(32|nt)?$/i){
> eval q{
> use lib "N:/xxx/perl_lib";
> use Win32::Process;
Original Message-
From: Ho, Tony [mailto:[EMAIL PROTECTED]]
Subject: RE: "Use of uninitialized value" error message
Hi Nikola/Jason
Thanks for the help.
The variable $result_value1 is declared within the subroutine and is never
used outside the subroutine.
I originally had the follow
> -Original Message-
> From: michael [mailto:[EMAIL PROTECTED]]
> Subject: Re: getOpt::long?
> >
> > > I am a true perl newbie.
> >
> > If you continue like this you will stay one.
> >
> :-) Thanks for all the feedback. I had intended to send the
> assignment as an
> attachment and ask ab
> -Original Message-
> From: Ho, Tony [mailto:[EMAIL PROTECTED]]
> Subject: "Use of uninitialized value" error message
>
> Hi guys
> I was wondering if you could help me with the following problem.
>
> I am getting the following error message:
>
> Use of uninitialized value in string
> -Original Message-
> From: Steven M. Klass [mailto:[EMAIL PROTECTED]]
> Subject: Multiline searching -
>
>
> Hi all,
>
> I have a text that broken into sections. Each section
> has comments(;) and
> can be placed anywhere, Each section ends with "*ENDS" .
> Each section
> -Original Message-
> From: Jenda Krynicky [mailto:[EMAIL PROTECTED]]
> Subject: Re: Problem with EXE created by PerlApp
>
> From: Jason Larson <[EMAIL PROTECTED]>
>
> Sorry I don't understand why this happens. Just a wild guess ...
> could you try t
Looks like you that almost works, Tanton. I think what he wants is:
$string =~ s/^(.*?)Call Distance:.*/$1/;
Hope this helps...
Jason
> -Original Message-
> From: Tanton Gibbs [mailto:[EMAIL PROTECTED]]
> Sent: Sunday, March 10, 2002 11:29 PM
> To: Daniel Falkenberg; bob ackerman
> C
> -Original Message-
> From: M z [mailto:[EMAIL PROTECTED]]
> Subject: help with my parser program?
>
> could someone please help me make this bit of code
> more efficient? I am trying to break really long
> lines, say up to 600 characters into manageable sizes
> (78 or less characters)
__Disclaimer__ ***Sorry about the giant company disclaimer at the end***
I have a script (script follows signature) that works just fine when
executed at the command line (i.e. perl.exe fixnetrcname.pl). I want to
make this an executable to distribute to systems that don't have Perl
installed, bu
> -Original Message-
> From: Jeff 'japhy' Pinyan [mailto:[EMAIL PROTECTED]]
> Cc: 'Daniel Falkenberg '; [EMAIL PROTECTED]
> Subject: RE: Finding words between words...
>
>
> On Mar 7, Timothy Johnson said:
>
> >From: Jeff 'japhy' Pinyan
> >
> >> ($btwn) = $str =~ /In:(.*)Your/;
> >
> >
> -Original Message-
> From: michael [mailto:[EMAIL PROTECTED]]
> Subject: text editors
>
> Speaking of text editors, anyone know of a good one that has
> line #ing
> for W2K? Free, of course (I am a student).
I'm still testing a number of them myself, but so far I like ConTEXT for
PERL
> -Original Message-
> From: Patrick Bateman [mailto:[EMAIL PROTECTED]]
> Subject: File substitutions??
>
> Hi everyone
Hi! I'm still pretty new myself, so forgive me for not doing this the
"Perl way".
>
> Need help with this please, pretty please!!
>
> I open a file containing this:
> -Original Message-
> From: siren jones [mailto:[EMAIL PROTECTED]]
> Subject: simple file reading question
>
> I have a file containing a list of names, for example:
>
> S2000123456.met
> S2000123457.ozone
> S2000123458.hdr
> S2000234569.met
>.
>. etc.
>
> I'm looking for a sho
> -Original Message-
> From: Raja Gopal [mailto:[EMAIL PROTECTED]]
> Subject: Request from Beginner
>
> Hello All,
>
> I would like to learn PERL for handling files.
> (Open, edit, close, write, delete some lines, pattern
> matching..etc). I did search in the net (using
> Google.com)
> -Original Message-
> From: Jorge Goncalvez [mailto:[EMAIL PROTECTED]]
> Subject: re:Regexp needed
>
>
> hi, i have this:
> my ($Path) = $MountsPath =~ /(.+?)cygwin/;
> but I wanted to get rid of the "/".
> because $MountsPath could be c:/cygwin or c:/xyz/cygwin or
> c:/xyz/zyx/cygwin
> -Original Message-
> From: Timothy Johnson [mailto:[EMAIL PROTECTED]]
> Subject: RE: reading one character at a time
>
> I can't check this right now, but I believe you can do it like this:
>
> $Line = "some string";
> @array = split //,$Line; #split on null
> foreach(@array){
>$c
> -Original Message-
> From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]
> Subject: Comparing to many possibles
>
> Greetings;
>
> Is there some perl shorthand that will make it easier to say
>
> if ( $x eq 'X' || $x eq 'Y' || $x eq 'Z' )
>
This should do what you want:
if
> -Original Message-
> From: Dermot Paikkos [mailto:[EMAIL PROTECTED]]
> Subject: Using strict and getting return values
>
> Hi Gurus,
Well, I'm definitely not a guru, but I think I might be able to help... :)
>
> I am trying to get tidy with my scripts and want to use Strict but am
>
> If I have a string and the first character is a space,
> may not always be a space.
> Example: John
> Tommy
> Beth
>
> John and Beth have a space, Tommy does not.
> How do I strip that. I do not want to use the global
> command because a want the space between Fir
-Original Message-
From: bob ackerman [mailto:[EMAIL PROTECTED]]
Sent: Thursday, February 28, 2002 11:32 AM
To: richard noel fell
Cc: [EMAIL PROTECTED]
Subject: Re: pattern matching question
On Thursday, February 28, 2002, at 08:37 AM, richard noel fell wrote:
> while (defined($Line=)){
-Original Message-
From: richard noel fell [mailto:[EMAIL PROTECTED]]
Sent: Thursday, February 28, 2002 10:38 AM
To: [EMAIL PROTECTED]
Subject: pattern matching question
I have the following bit of code:
#!/usr/bin/perl -w
open In2,"/home/rfell/tutoring/beaven/webproject/tmp/maxima_log" o
># this is a script to clean
>
>open(IN,"fileToClean.asc") || die "can't open!";
>
>while() {
>s/Good/Bad/;
>print;
>}
>
>On the screen I can see that this is working, but when I open the file,
>guess what? Nothing has changed! ...can anybody figure out what I am
doing
>wrong?
I'm st
Triyng
$x=qx(xcopy a:\\1*.* c:\\tmp);
print"\n after \n$x \n before \n";
this is how it looks my dos session
C:\WINDOWS\Escritorio>perl -w kk.pl
13feb.zip
1 archivos copiados
after
before
-
> I'm sure this is simple but I'm getting more and more confused:
Don't feel bad - I stay that way! :)
> I want to validate input so that it is either:
>a valid dos filename (we still use it)
>up to 12 alphanumeric characters (inc spaces)
>nothing (in which case 'none' would be enter
Jenda is correct - it's not OT, and yes, you will need to filter the
subkeys. You want to look for the values of the "DisplayName" strings.
These are the values that show up in Add/Remove Programs.
-Original Message-
From: Jenda Krynicky [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, Januar
36 matches
Mail list logo
