On Sat, Feb 07, 2004 at 02:08:26PM -0800, John W. Krahn ([EMAIL PROTECTED]) wrote:
> Kenton Brede wrote:
> >
> > I've written the following subroutine to snag the next available UID in
> > the 700 range from /etc/passwd. I then use the return value with
> > "useradd" to add a new user.
> >
> > T
On Sat, Feb 07, 2004 at 07:42:30PM -, Rob Dixon ([EMAIL PROTECTED]) wrote:
>> Kenton Brede wrote:
>>
> Hi Kenton.
Hi, thanks for the great code.
> How does this look?
Well ... complex :) Let me see if I can put this in English.
> sub get_uid {
> my %list;
> @list{map {(split /
Harshal Borade wrote:
> I certainly appreciate the pain you have gone through
> in writing that mail, but I haven't understood about
> "perldoc -f my".
It is meant to be entered exactly as written on the command-line. It is the
same way we call Perl programs:
>perldoc -f my
is a call to the perl
Kenton Brede wrote:
>
> I've written the following subroutine to snag the next available UID in
> the 700 range from /etc/passwd. I then use the return value with
> "useradd" to add a new user.
>
> The subroutine works fine. If no UID 700 is found it returns 700.
> It then returns the next avai
On Feb 7, 2004, at 2:20 PM, Jan Eden wrote:
Yes, SUPER:: is introduced just two paragraphs later. I read on, but
the uncertainty about $class->Animal::speak kept bugging me. ;)
Excellent. I figured that was the case, but I was just making sure.
James
--
To unsubscribe, e-mail: [EMAIL PROTECTED
James Edward Gray II wrote:
>On Feb 7, 2004, at 10:02 AM, Jeff 'japhy' Pinyan wrote:
>
>> On Feb 7, Jan Eden said:
>>
>>> { package Mouse
>>>@ISA = qw{Animal};
>>>...
>>>sub speak {
>>>my $class = shift;
>>> ...
>>> Animal::speak($class);
>>> ...
>>> }
>>> }
>>
>>
James Edward Gray II wrote:
>On Feb 7, 2004, at 10:02 AM, Jeff 'japhy' Pinyan wrote:
>
>> On Feb 7, Jan Eden said:
>>
>>> { package Mouse
>>>@ISA = qw{Animal};
>>>...
>>>sub speak {
>>>my $class = shift;
>>> ...
>>> Animal::speak($class);
>>> ...
>>> }
>>> }
>>
>>
Kenton Brede wrote:
>
> I've written the following subroutine to snag the next available UID in
> the 700 range from /etc/passwd. I then use the return value with
> "useradd" to add a new user.
>
> The subroutine works fine. If no UID 700 is found it returns 700.
> It then returns the next availa
On Sat, Feb 07, 2004 at 12:57:45PM -0600, Kenton Brede wrote:
> I've written the following subroutine to snag the next available UID in
> the 700 range from /etc/passwd. I then use the return value with
> "useradd" to add a new user.
>
> The subroutine works fine. If no UID 700 is found it retu
I've written the following subroutine to snag the next available UID in
the 700 range from /etc/passwd. I then use the return value with
"useradd" to add a new user.
The subroutine works fine. If no UID 700 is found it returns 700.
It then returns the next available UID or adds 1 to the last UID
On Feb 7, 2004, at 11:37 AM, Wiggins d'Anconia wrote:
Securing your system from someone is different than firing back. And
your house analogy is really dumb, it has predefined borders that are
very distinct. Your webserver is open and you are inviting someone to
look at anything on it, for the
I've been holding off on responding to this thread but now
I've dealth with security for some time on Unix/Linux systems. Some of
my favorite products certainly have the ability to perform a counter
attack however the author of those products always warn the user NOT to
taunt happy fun bal
On Feb 7, 2004, at 10:02 AM, Jeff 'japhy' Pinyan wrote:
On Feb 7, Jan Eden said:
{ package Mouse
@ISA = qw{Animal};
...
sub speak {
my $class = shift;
...
Animal::speak($class);
...
}
}
I was about to ask why it's written this way, but upon checking the
source, I see
--As off Saturday, February 7, 2004 12:37 PM -0500, Wiggins d'Anconia
is alleged to have said:
What is to stop a spammer or script kiddie finding out about your
ruse, possibly even listening in on the conversation, and rather
than trying to hack your system starts sending out mass emails to
peopl
> -Original Message-
> From: LoneWolf [mailto:[EMAIL PROTECTED]
> Sent: Friday, February 06, 2004 10:56 AM
> To: [EMAIL PROTECTED]
> Subject: Script Kiddie issues
>
>
> Frankly I use the apache filter to check for people looking
> for cmd.exe or root.exe or any one of a dozen files, and
Lone Wolf wrote:
Nah, because the only ones who receive the file are those attempting to
do harm to my system. Granted I could make it go to a warning page,
which after a few seconds dumps them to the other page, thereby giving
them a warning before I fire the shot, just like a trespasser in my
h
Jeff 'japhy' Pinyan wrote:
>BUT HERE, we're using
>
>$class->OtherClass::method(@_);
>
>which says explicitly to start looking for method() in OtherClass
>(and if it fails there, look in OtherClass's @ISA). So
>
>$class->Animal::speak();
>
>in your case becomes
>
>Animal::speak($class);
>
>excep
On Feb 7, Jan Eden said:
>I just work my way through "Learning Perl Objects, References & Modules".
>Now at one point, I am stuck: Randal introduces classes and methods in
>Chapter 8.
Hopefully I'll answer before Randal. ;)
>{ package Mouse
>@ISA = qw{Animal};
>...
>sub speak {
>
Who in their right mind would walk into a courthouse and tell the judge
they were trying to break into a computer system (which in and of itself
holds MANY penalties because information on a company system is
invaluable per previous court cases) and say that they lost data on
their system when thei
Nah, because the only ones who receive the file are those attempting to
do harm to my system. Granted I could make it go to a warning page,
which after a few seconds dumps them to the other page, thereby giving
them a warning before I fire the shot, just like a trespasser in my
house. Do I shoot
Rob Dixon wrote:
>Jan Eden wrote:
>>
>>Rob Dixon wrote:
>>
>>>John W. Krahn wrote:
>>
use File::Find; local ( $^I, @ARGV ) = ''; find( { no_chdir => 1,
wanted => sub { -f and push @ARGV, $_ } }, './mydir' );
s/foo/bar/g, print while <>;
>>>
>>>Thanks John.
>>>
>>>I missed the 'has sub
Hi all,
I just work my way through "Learning Perl Objects, References & Modules". Now at one
point, I am stuck: Randal introduces classes and methods in Chapter 8.
He gives the following example for overriding methods:
{ package Mouse
@ISA = qw{Animal};
...
sub speak {
my $cla
Jan Eden wrote:
>
> Rob Dixon wrote:
>
> >John W. Krahn wrote:
>
> >> use File::Find;
> >> local ( $^I, @ARGV ) = '';
> >> find( { no_chdir => 1, wanted => sub { -f and push @ARGV, $_ } }, './mydir' );
> >> s/foo/bar/g, print while <>;
> >
> >Thanks John.
> >
> >I missed the 'has subdirectories'
What a great idea. You'll make lots of new friends in the Big House.
At 04:24 PM 2/6/04 -0500, Michael W.Cocke wrote:
>On Fri, 6 Feb 2004 07:55:41 -0800 (PST), [EMAIL PROTECTED] (Lonewolf)
>wrote:
>
>>Frankly I use the apache filter to check for people looking for cmd.exe or
>>root.exe or any one
On Fri, 6 Feb 2004 07:55:41 -0800 (PST), [EMAIL PROTECTED] (Lonewolf)
wrote:
>Frankly I use the apache filter to check for people looking for cmd.exe or
>root.exe or any one of a dozen files, and instead of my log files filling
>with their looks they are sent an iframe html page with a virus built
For Quality purpouses, Balaji Thoguluva 's mail on Friday 06 February 2004
18:49 may have been monitored or recorded as:
> Hi,
Hi
> I have a long BNF (Backus-naur form) for parsing a protocol message.
> Suppose I want to implement a BNF like this
>
> Response = Status-line
>
Harshal Borade wrote:
>I certainly appreciate the pain you have gone through
>in writing that mail, but I haven't understood about
>"perldoc -f my". I went through a book , How to Perl
>5, last night. And it says that every variable
>declared gets into main, a default package. To avoid
>the namesp
John W. Krahn wrote:
>
> Chetak Sasalu wrote:
> >
> > Hi,
>
> Hello,
>
> > I have to search and replace 'foo' to 'bar' in all the files in a
> > directory(has subdirectories).
> > The files are about 40k in size.
> >
> > On the command line I would do it as,
> > find ./mydir/ -type f -print | xargs
I certainly appreciate the pain you have gone through
in writing that mail, but I haven't understood about
"perldoc -f my". I went through a book , How to Perl
5, last night. And it says that every variable
declared gets into main, a default package. To avoid
the namespace pollution it says that, i
29 matches
Mail list logo
