- Original Message -
From: "JupiterHost.Net" <[EMAIL PROTECTED]>
To:
Sent: Wednesday, January 19, 2005 8:47 PM
Subject: quiet CPAN instead of verbose?
> http://search.cpan.org/~andk/CPAN-1.76/lib/CPAN.pm#Programmer's_interface
>
> Is there any way to make $mod->install and $mod->uptod
- Original Message -
From: "Groleo Marius" <[EMAIL PROTECTED]>
To:
Sent: Thursday, January 13, 2005 4:46 AM
Subject: Perl Socket
> Hi list!
Hello Marius,
>
> im try-ing this code, to get a multi line server response:
>
> use Socket;
> socket(sock, AF_INET, SOCK_STREAM, getprotobyname('
- Original Message -
From: "Vladimir Lemberg" <[EMAIL PROTECTED]>
To: "Vladimir Lemberg" <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]>
Sent: Wednesday, October 27, 2004 8:16 PM
Subject: Re: Comparing two directories
Hello,
I beleave the two codes you have posted will yield identical resul
- Original Message -
From: <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Friday, October 22, 2004 1:27 AM
Subject: zcat
> Hi
Hello,
> I have a gunzip file which I have to decompress through a perl script
> and copy the uncompressed file to another file.
> I used this
>
> system('zca
- Original Message -
From: "Jenda Krynicky" <[EMAIL PROTECTED]>
To: "Perl Beginners" <[EMAIL PROTECTED]>
Sent: Tuesday, October 19, 2004 4:50 PM
Subject: Re: Multiple Perl installations
> From: [EMAIL PROTECTED]
> > I currently have 2 Perl installations 5.6.0 and 5.8.3 installed on one
- Original Message -
From: "Mark Goland" <[EMAIL PROTECTED]>
To: "Jenda Krynicky" <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]>
Sent: Monday, October 18, 2004 6:33 PM
Subject: Re: SQL2000
> Jenda,
> Thanks you are correct as usual. I do need
Jenda,
Thanks you are correct as usual. I do need to connect to MS SQL Server.
DB Stuff is a new task for me. Are there ODBC Drivers for Unix servers ?? Or
Alternative ways of accessing MS SQL from Unix servers ??
- Original Message -
From: "Jenda Krynicky" <[EMAIL PROTECTED]>
To: <[EM
- Original Message -
From: "John W. Krahn" <[EMAIL PROTECTED]>
To: "Wiggins d Anconia" <[EMAIL PROTECTED]>; "Perl Beginners"
<[EMAIL PROTECTED]>
Sent: Friday, October 15, 2004 11:30 PM
Subject: Re: Reference syntax...
> Wiggins d Anconia wrote:
> >
> > Usually when you need this is when
- Original Message -
From: "loan tran" <[EMAIL PROTECTED]>
To: "perl beginners" <[EMAIL PROTECTED]>
Sent: Monday, October 11, 2004 3:36 PM
Subject: Re: Can do in 1 while loop?
>
> --- Ramprasad A Padmanabhan
> <[EMAIL PROTECTED]> wrote:
>
> > On Mon, 2004-10-11 at 06:26, loan tran wrote
- Original Message -
From: "Wiggins d Anconia" <[EMAIL PROTECTED]>
To: "Mark Goland" <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]>
Sent: Thursday, September 16, 2004 1:27 PM
Subject: Re: HoH not building as expected
>
>
> > > >
&
- Original Message -
From: "Wiggins d Anconia" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]>
Sent: Thursday, September 16, 2004 11:30 AM
Subject: Re: HoH not building as expected
> > Hi All,
> > I am trying to build a HoH, who's keys will be referances to
> prod
$XML::Simple::VERSION"
2.12
- Original Message -
From: "Wiggins d'Anconia" <[EMAIL PROTECTED]>
To: "Mark Goland" <[EMAIL PROTECTED]>
Cc: <[EMAIL PROTECTED]>
Sent: Monday, June 07, 2004 10:25 PM
Subject: Re: XML::Simple
> Mark Goland wrote:
Hello all,
I am trying to play with simple XML. I hace reated a file, and am trying to read it
in using XML::Simple and write it out, but with no luck :O(. Can someone point me to
the correct error.
Thanks in Advance,
Mark G
CODE:
#!PERl -w
use XML::Simple;
use Data::Dumper;
$ref = XMLin('.\
- Original Message -
From: "Wiggins d'Anconia" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Cc: <[EMAIL PROTECTED]>
Sent: Thursday, April 01, 2004 9:24 PM
Subject: Re: Hash ref's of hash's
> [EMAIL PROTECTED] wrote:
> > Hi all,
> > I am trying to setup a hash who's values are refera
John,
this code didn't work for me. Although I did have to change to
;
- Original Message -
From: "John W. Krahn" <[EMAIL PROTECTED]>
To: <>
Sent: Friday, April 02, 2004 7:47 PM
Subject: Re: Hash ref's of hash's
> [EMAIL PROTECTED] wrote:
> >
> > Hi all,
>
> Hello,
>
> > I
v ??
Mark
- Original Message -
From: "Rob Dixon" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Friday, February 13, 2004 7:26 AM
Subject: Re: strings
> Mark Goland wrote:
> >
> > I have a tring which contains 60 to 80 keywords, I need to know what
p
Hi All,
I have a tring which contains 60 to 80 keywords, I need to know what position a
keyword is in. I need an efficint way to extra position of key words, here is how I am
currently finding positions,
$string="type,model,color,date";
# this is how I am currently getting position, which is n
Sorry for not being more clear. The problem is that it doesnt seem to be
able to read of the duped handle { $line2 is empty on }.
- Original Message -
From: "Tom Kinzer" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Tuesday, December 02, 2003 4:15 PM
Subject: RE: Reading files
> I d
How about a gui wraper for IPFW, that will run on say G-nome ??
Mark
- Original Message -
From: "kasi ramanathen" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Wednesday, January 22, 2003 12:18 PM
Subject: project
>
> dear friends
>
> you can give me idea for any poject networking,
my $path=`pwd` on *nix
my $path=`cd` on win*
- Original Message -
From: "Brian Ling" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Tuesday, January 21, 2003 4:25 AM
Subject: Path to script
> Hi all,
>
> I have the following bit of code that works out the directory path to
> the cur
The problem is that you this lock is not mandetory, if you really really
want to lock the file, you have to set mendatory lock's. You have to setup a
system in which a user will be able to delete/create a file. you can setup
semaphore scheme.
Mark
- Original Message -
From: "Mkrous" <[EM
hey gang,
I know this is unrelated, but does anyone know of a good Tk tutorial, or
book ??
Thanx,
Mark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Very CutE !!!
Mark
- Original Message -
From: "Paul Corr" <[EMAIL PROTECTED]>
To: "shirish doshi" <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]>
Sent: Thursday, January 16, 2003 12:10 PM
Subject: Re: Help for telnet using perl
> At 2:49 PM -0800 1/15/03, shirish doshi wrote:
> >Hi,
> >I a
nd waiting for
> it (I don't think waitpid would work for you here, since you won't get a
> signal from a process that isn't a child of yours when it exits).
>
Yeh, thats exactly what I am looking for.
----- Original Message -
From: "Chander Ganesan" <[EMA
is I am not sure about.
will look into that.
Thanx,
Mark
- Original Message -
From: <[EMAIL PROTECTED]>
To: "Mark Goland" <[EMAIL PROTECTED]>; "perl" <[EMAIL PROTECTED]>
Sent: Wednesday, January 15, 2003 2:04 PM
Subject: RE: waitpid
>
> --
before the cab is
extracted.
Mark
- Original Message -
From: "Beau E. Cox" <[EMAIL PROTECTED]>
To: "Mark Goland" <[EMAIL PROTECTED]>; "perl" <[EMAIL PROTECTED]>
Sent: Wednesday, January 15, 2003 1:34 PM
Subject: RE: waitpid
> Hi -
>
> &
"Beau E. Cox" <[EMAIL PROTECTED]>
To: "Mark Goland" <[EMAIL PROTECTED]>
Cc: "perl" <[EMAIL PROTECTED]>
Sent: Wednesday, January 15, 2003 1:27 PM
Subject: RE: How 'global' are STDIN/STDOUT/STDERR?
> Thanks Mark - I thought maybe that was the
Hello Perl lovers,
I am developing a script which runs in TCSH 6.x shell. I have two questions
1. I need to be able to set an global enviernment variable. The shell has a
build in command setenv which would enable me to do what I need. This is
what I try,
system("setenv DESTDIR /mnt");
...but
Threads share U area , thats where file descripters are stored for your
process. All threads are in one process. I sedjest using semaphors for
contolling access to any resources.
Mark
- Original Message -
From: "Beau E. Cox" <[EMAIL PROTECTED]>
To: "'Beginners" <[EMAIL PROTECTED]>
Sent: We
You need tp pass starting directory to argument to your program "prog.pl
c:\"
might also consider ...
> #!/bin/perl
>
> use strict;
> use Cwd;
>
> my ($startpath, $cwd, $startat, $list);
>
> $startpath = $ARGV[0];
> $cwd = getcwd();
>
> chdir $startpath;
> $startpath = getcwd();
>
> sub godown($@
you can try to use alarm and time your aperation. if times expires catch
sig{alar}, and do your erro stuff inside .
Mark
- Original Message -
From: "Najamuddin, Junaid" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Monday, January 13, 2003 5:03 PM
Subject: Timing the response
> Hi,
> if (!$ARGV[0]){
> die("you've forgotten to enter the file name\n");
> }
> if (!$ARGV[1]) {
> $n = 9; # output 10 rows by default
> }
> else {
> $n = $ARGV[1]-1;
> }
what if the user enters, "script.pl 8 " ??? This wil try to open a file 8
and dump last 9 lines of it.
if(
perldoc perlop, for all operators you need
Mark
- Original Message -
From: "Susan Aurand" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]>
Sent: Saturday, January 11, 2003 9:48 AM
Subject: using an AND operator
>
> Is there an AND operator in perl? For example;
>
> if
> foreach my $i ( sort { $a <=> $b } (keys (%hash))) {
>print "$i => $hash{$i}\n" if ( defined $hash{$i} );
> }
> }
>
how about
foreach my $i ( sort ( keys(%hash) ) ) {
print "$i => $hash{$i}\n"
Whoops.
$answer =~ m/^y|n$/i
:O)
- Original Message -
From: "John W. Krahn" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Friday, January 10, 2003 2:38 PM
Subject: Re: Delimiter Question
> Mark Goland wrote:
> >
> > > How do I challene
> How do I challenege more than one variable like I want to
> check for the input of Y N y or n for a yes no question. I
> put until $answer =~ m/YyNn/ that did not work. Anybody have
> any solutions?
the way you did it, would need to use or operator
$answer =~ m/Y|y|N|n/
you probebly want to
So once you know that its a filehandle, how [ if you can ] can you tell
which file its associated with ??
Mark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
How about,
print "its a file handle\n" if ( fileno($FH) );
- Original Message -
From: "Beau E. Cox" <[EMAIL PROTECTED]>
To: "'Beginners" <[EMAIL PROTECTED]>
Sent: Wednesday, January 08, 2003 11:43 PM
Subject: File Handle?
> Hi -
>
> I want to determine is a variable is a file handle.
I have installed pgp 6.5.8 , and am testing on winXP. I can encrypt and
decrypt from cmd just fine. Have anyone used this pack, I am having a hard
time Can any make something of it ??
use Crypt::PGPSimple;
{
open my $RD_FH,"< $ARGV[0]" || die "cant open $ARGV[0]: $!";
local @TMP=<
no, I want to use one of Crypt modules which expacts to be passed strings of
n*16 bytes. How do I go about genereting such blocks ??
Mark
- Original Message -
From: "Paul Johnson" <[EMAIL PROTECTED]>
To: "Mark Goland" <[EMAIL PROTECTED]>
Cc: "per
hi , I am having a hard time matching n bits at a time. basicly I have a
string which can be X bytes long, I want to creat an array of N bytes long.
So lets say X=23 and N=5, I would have an array of 5, for of which would be
5 bytes long. Any idea's ?? are there any modules that can split up string
Does anyone know a good place to start on encryption socket streams ??
Mark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
]>
Sent: Thursday, January 02, 2003 7:40 PM
Subject: Re: Name a Free PERL Campiler for Win2k
> From: Mark Goland <[EMAIL PROTECTED]>
> > Active has something called perl2exe
>
> ActiveState has something called PerlApp. It's part of the PDK (Perl
> Development Kit). h
Active has something called perl2exe
- Original Message -
From: "LRMK" <[EMAIL PROTECTED]>
To: "K Clark" <[EMAIL PROTECTED]>
Cc: <[EMAIL PROTECTED]>
Sent: Wednesday, January 01, 2003 1:16 PM
Subject: Re: Name a Free PERL Campiler for Win2k
> Yes I Mean to Creat Binary .EXEs
> not
I know there was already solution posted, just wrote my own ver of it.
print "Enter the IP address: ";
$ip = <>;
print "Enter the Subnet address: ";
$sn = <>;
chomp $ip; chomp $sn;
$ip=CIDR2bin($ip);
$sn=CIDR2bin($sn);
printf "The network adr is: %vd\n", $ip & $sn;
sub CIDR2bin{ return pack 'c
Sorry, I dont know much about IO::Socket module, but here are some tips
use IO::Socket qw (:DEFAULT :crlf);
>$EOL1 = "\012";
>$EOL2 = "\015";
can be $/=crlf; so no more of,
>$input =~ s/$EOL1//g;
>$input =~ s/$EOL2//g;
just chomp($input);
this is how threading and forking would work. After y
It can probebly be done. I did something of this sort on my freebsd box. It
would probebly be more difficult, since perl probebly install's its dll's in
windows directory.
Mark
- Original Message -
From: <[EMAIL PROTECTED]>
To: "Craig Williams" <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]>
Sent
the unless() will get rid of the error.
>
> But, it looks like he's just checking that $ARGV[0] is a directory. This
can
> be accomplished with a simple -d test.
>
>die "Expected directory\n" unless @ARGV && -d $ARGV[0];
>
> >
> > Thanks!
> > S
ok, the problem was with send and read. I think send is used with msg
passing. If you are going to use raw sockets, then use raw writes and reads.
I tested this on a windows machine, so might have to change a few things on
*niX.
Server:
use Socket;
$SOMAXCONN=2;
socket(SERVER, AF_INET, SOCK_ST
unless you want to recurse the tree this will do it,
unless(opendir local $TMP,$ARGV[0] ){
print "-invalid directory-\n";
print "USAGE:\n\t\t$0 directory to parse";
exit 1;
}
chomp (@FILES=`dir /s /b $ARGV[0]`);
for ( @FILES ){
( $Size+= (stat $_)[7] );
}
print "TOT
ewall mode { passive
or non passive}. If it doesnt then your firewall is not leting anything
through on port 21.
Mark
- Original Message -
From: "Foreman" <[EMAIL PROTECTED]>
To: "Mark Goland" <[EMAIL PROTECTED]>
Cc: "perl" <[EMAIL PROTECTED]>
Sen
192is a privat address, this never get to the firewall.
It seems that your port 21 is totally blocked. Can you login to your ftp
server from the prompt ?? try from shell
#FTP ftp.lforeman.homeip.net
#user pass
#passive
- Original Message -
From: "Foreman" <[EMAIL PROTECTED]>
To: <[EM
this should do itperhaps someone can come up with a one liner
->cut
use IPC::Open3;
$CMD=join " ",@{ARGV[0..$#ARGV-1]}; #build up command
open3( local $TMP , \*RDRFH,local $TMP ,"$CMD"); #run it
open WR_FH, "> $ARGV[$#ARGV]" || die "could creat $ARGV[$#ARGV]: $!";
print WR_FH while ;
>Checked out the Mac lately? OS X is unix
yeh I guess...thank the FreeBSD teaM
- Original Message -
From: "Bryan Harris" <[EMAIL PROTECTED]>
To: "'Perl'" <[EMAIL PROTECTED]>
Sent: Wednesday, December 18, 2002 12:17 PM
Subject: Re: Editors
>
>
> > What editors do you guys use whe
Anyone try Nedit ??
- Original Message -
From: "Emil Perhinschi" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Wednesday, December 18, 2002 8:44 AM
Subject: Re: Editors
> mcedit does a pretty good job, zile is nice, too, and low on resources
>
>
> :-)
>
>
> emil per.
> Paul K
you can also look inside /proc although the data in there is mostly binary.
PS just parses your proc directory. read up on PROCFS
Mark
- Original Message -
From: <[EMAIL PROTECTED]>
To: "zentara" <[EMAIL PROTECTED]>
Cc: <[EMAIL PROTECTED]>
Sent: Friday, December 13, 2002 1:48 PM
Subject:
how about
#/usr/bin/perl -w
>
> use strict;
> use Net::SFTP;
>
my ($sftp) = Net::SFTP->new("10.25.3.150", user=>"administrator",
password=>"suite100") || warn "connection failed $!";
> if (!$sftp) {
> print "I can't connect!";
> } else {
> print "SUCCESS!";
> }
>
- Or
cember 09, 2002 3:16 PM
Subject: Re: linked list's
> Hi, Mark, :)
>
> On Sun, 8 Dec 2002, Mark Goland wrote:
>
> > I am having problems printing this doubly list. the bug statment
> > prints the expacted so I think I have the list setup right, but I
> > cant get
Well whats not working ??
Mark
- Original Message -
From: "Mark-Nathaniel Weisman" <[EMAIL PROTECTED]>
To: "Mark Goland" <[EMAIL PROTECTED]>
Cc: "perl" <[EMAIL PROTECTED]>
Sent: Monday, December 09, 2002 3:14 AM
Subject: RE: Using ssh for
hi all,
I am having problems printing this doubly list. the bug statment prints the
expacted so I think I have the list setup right, but I cant get this list to
print in reverse... any ideas ??
Thanx in Advance
#!/usr/bin/perl -w
$debug=1;
for($i=1;$i<10;$i++){
$list = {value=>$i,prev=>$
bove. Am I passing the password correctly, when I do this
> manually I get a request for a password, could this be an error number?
>
> His Faithful Servant,
> Rev. Mark-Nathaniel Weisman
>
> -Original Message-
> From: Mark Goland [mailto:[EMAIL PROTECTED]]
> Se
why are you printing the comman to a file... this is how I would rewrite the
part that does the command. If you dont want to write it as a shell command
use Socket, or use IO::Socket.
use FileHandle;
use IPC::Open2;
My (@machines,$host,$user,$pass)
# read your record
Open(INFILE," );
Close(INFILE
Hi guys, I am trying to write a client/server app. The problem I am having,
has to do with line terminators. my questions is when I connect from unix to
windows do I need to set $\= CRLF and form windows to unix $\=LF ?? also is
there a method to deturnime which machine is connecting to which ??. I
> system (('tunctl',-u,$buf) | ('awk',print,$2) );
you can also try this
system ("tunctl,-u,$buf | awk,print,$2 " );
- Original Message -
From: "Timothy Johnson" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]>
Sent: Monday, November 18, 2002 2:40 AM
Subject: RE: system f
Hi all,
I am trying to do directory traversal on NTFS. When I test fileif its a
directory or a regular file. It does not seem to work. -d anf -f test's dont
seem to work as well. Can someone please look over my error.
Thankx in advance, Mark
#!c:\perl\bin\perl -w
use Win32::File ;
&my_trav('.'
Hi guys,
In my script I am need to send an explicit EOF to another program, I open
inside my script. Something like this...
open FH,"| prog that runs";
print FH "blah blah";
print FH "EOF" # send program EOF.
I tryd closing the handle , but that didnt work. Any Idea's ??
Thanx in advance,
Mar
Is anyone aware of any WIN perl modules that can scan a directory and tell
you which file is being used by which process. Or all files opened by all
processes ??
Thanx in Advance,
Mark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
THANX
- Original Message -
From: "Steve Grazzini" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Monday, October 28, 2002 11:33 PM
Subject: Re: files
> Mark Goland <[EMAIL PROTECTED]> wrote:
> > Hi all,
> >
> > I am trying to read
ea's ??
- Original Message -
From: "Jeff 'japhy' Pinyan" <[EMAIL PROTECTED]>
To: "Mark Goland" <[EMAIL PROTECTED]>
Cc: "perl" <[EMAIL PROTECTED]>
Sent: Monday, October 28, 2002 10:50 PM
Subject: Re: GET
> On Oct 28, Mark Goland said:
&g
HeYa all again,
Bumped into another problem. Not sure if this is the right place to ask, but
someone might have encountred this here. It seems that if you give a long
arg to open on winXP{ extanding MAX_CANNON on command prompt } it will get
broken into lines. Does anyone know how to fix it ? Here
Hi all,
I am trying to read from file handles in a loop. What I want to do is add a
string to a file handle. Here is an example of what I am tryin to do.
open FH1,"file";
open FH2,"otherfile";
...
...
foreach $Val (@F_handles){
@LINES= # add $Val to handl name
}
is it possible ??
-
GreaT !!! changed the properties, it workS...
:O) <~ happy Camper .
Thanx much to BeaU and whom ever posted the fiX
- Original Message -
From: "Beau E. Cox" <[EMAIL PROTECTED]>
To: "Mark Goland" <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]>
Sent:
hey guys,
I am trying to run this code on ActiveState v5.6.1, doesnt seem to wanna
print the arguments I am passing. Can some one please look over it and see
if u can spot anything.
#!c:\perl\bin\perl -w
print "$ARGV[0]\t$ARGV[1]\n";
Thanx in Advance,
Mark
--
To unsubscribe, e-mail: [EMAIL
Well you could write a script that traverses those directory's every X
minutes and stores all files. If a new record is found do a stat on a file
get UID of creator do UID->username converssion, and a new entry and then
e-mail away. Other then that, you would have to look into file system code,
to
it means that the variable was only used once, cuased by -w. Since you dont
usualy declair variables once, with out using them. Warn will generate that
message.
Mark
- Original Message -
From: "Satheesh Ramamoorthy" <[EMAIL PROTECTED]>
To: "'Mark Goland'
You can probebly make it work with open, I am nto sure how to. This will
work...
#!/usr/local/bin/perl -w
use Fcntl; # for perm constants
use Errno; # for errno constants
unless ( sysopen ($FH,"test.txt",O_WRONLY|O_CREAT|O_EXCL, 0744) ){
if( $!{EEXIST} ){
print "file exists \n ";
# rename it
you can also do it with a shell command
open ( RD_FH," find . -name myname |");
# if you want to write to stdin of the command put the |
# before the command
$Result = ;
print $Result;
Mark
- Original Message -
From: "Dharmender Rai" <[EMAIL PROTECTED]>
To: "Elanchezhian Sivanandam"
t;>)
; last;
}
}
print " $P_length is the value \n";
_exit 0; # take this out once fixed
print PW_FH "p $P_num $P_type $P_start $P_lenght";
close PW_FH;
_exit 0;
Thanx in advance,
Mark
- Original Message -
From: "Hanson, Rob" <[EMAIL PROTECTED]&
Hi guys,
I am trying to implement a switch statment in perl. I have tryed doing it 2
way's. For some reason my comparison statments are not working can some one
please look over my code and see if they can point me on the right track ??
Thanx in advance,
Mark
Solution 1:
while( ( $Remainder =
Ic...sorry about that, It just didnt work on my XP box, but as I said great
on Solaris.
- Original Message -
From: "Nikola Janceski" <[EMAIL PROTECTED]>
To: "'Mark Goland'" <[EMAIL PROTECTED]>
Sent: Monday, September 16, 2002 1:38 PM
Subject: RE
should check the bit, and if its set
then waitI think this was already explained on the list. What you wish
to do can be done beter with semaphores.
- Original Message -
From: "Ramprasad A Padmanabhan" <[EMAIL PROTECTED]>
To: "Mark Goland" <[EMAIL PROTECTED]
Thanx John, I have not tested it yet, but it looks right...will give it a
try 2nite.
Mark
- Original Message -
From: "John W. Krahn" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Monday, September 09, 2002 7:35 AM
Subject: Re: locking a file in linux
This will do mandetory locking { which can also be done with "chmod +l
filename"}. If someone can rewrite this into perl , that would be great.
/*
write by Mark Goland use and enjoy keep the tag
[EMAIL PROTECTED]
*/
#include
#include
int main(int argc,char **argv){
int mo
Thanx guys both of yoru techniques work, what exactly does the function map
do I cant understand.
Thanx Mark
- Original Message -
From: "Janek Schleicher" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Saturday, August 31, 2002 4:18 AM
Subject: Re: hash
>
hi guys, I am trying to extractract a string and use it as a hashkey. Here
is an example of what I mean;
input:
ad0: hard drive
fd0: floppy drive
xl:network card
How I would liek the hash to be assigned;
hash{ad0}="hard drive"
hash{fd0}="floppy drive"
hash{xl}="network card"
Can some one pleas
Hi guys,
I was just wondering is there a perl interpreter that will fit on one floppy
disk ??
mark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Run, don't walk, to a bookstore and get Lincoln Stein's "Network
> Programming with Perl." It will cover at least 80% of what you need to
I have that book, it really is great for people who know about
network/IPC programing and are switching to perl!!
- Original Message -
From: "Pet
Hi falks,
Does anyone know of a way I can send RPC to my server ??
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Does anyone know a way to create graphic menu's without running X. I know curse can do
it. But I need something more lively.
Thanx,
Mark
89 matches
Mail list logo
