Does anyone know if there is a function in perl thaat works like the fc
(File Compare) function under dos or Unix?
If so, plse let me know.
Thanks,
Jim
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Hi folks,
Quick question I left my books at home. I am sure I'e seen a way to next
a loop to a higher level.
Let me explain..
while <> {
if ($_ =~ /something I need to find/) {
if ($_=~/something that tells me I need to look elsewhere/)
{
-Ursprungliche Nachricht-
Von: James Edward Gray II [mailto:[EMAIL PROTECTED]]
Gesendet: Montag, 30. September 2002 16:34
An: Hughes, James
Cc: [EMAIL PROTECTED]; Jones, Jeremy
Betreff: Re: Exiting loop to higher level
Drop the double. 'next' is what you're looking for.
James
Just a thought, but try to change to your directory first
my $dir = '/home/me/images/';
my @jpegs = `ls *.jpg`;
chdir ($dir) || die "Cannot chdir to $dir: $!";;
foreach (@jpegs) {
print"$_"; # dont forget that a newline is still at the end of
each element in the array...
Can anyone tell me if , and where there is an ascii file that holds the
current status of Windows NT and or 2000 services? This will help me greatly
with a perl project. Thanks!
Jim
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Hi there perl people of the world. I was wondering if anyone had a way to
assign the process list from Unix to an array using perl internals, not the
old " @PSINFO=`ps -ef`; " system call.
Thanx bunches!
Jim
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAI
OK, the change could be make in the following area:
open MYMESSGELOGFILE, "< /var/log/messages";
open MYSECURELOGFILE, "< /var/log/secure";
my @messageLog = ;
my @secureLog = ;
close MYMESSGELOGFILE;
close MYSECURELOGFILE;
I would write it like t
Hi there,
I am also just starting out in perl, but I would use the split funtion. It
takes the variable a part at desired points just like awk.
example:
#!/usr/bin/perl
#
open (FH,") { #Reads log file to $_
try the command sleep
for 5 min it would be
sleep 300;
(300 seconds)
James Hughes
DREGIS Dresdner Global IT-Services Gesellschaft mbH
Bankbetrieb
Server u. Geschäftsstellenservices (SH GM) Telephone
+49 (0) 69 / 2 63 - 82653
