RE: Foo (Bar)---I now see the light! (Or that which is made lig ht of)

[Ichim, Adrian N.]

Have a look at the Jargon File (google for an updated version). A
foobar-specific link  
is http://www.catb.org/%7Eesr/jargon/html/F/foobar.html

Adrian Ichim 

> -Original Message-
> From: jason corbett [mailto:[EMAIL PROTECTED] 
> Sent: Wednesday, September 08, 2004 8:14 PM
> To: perl beginners
> Subject: Foo (Bar)---I now see the light! (Or that which is 
> made light of)
> 
>  
>  
>  
> 
> 
> jason corbett <[EMAIL PROTECTED]> wrote:
> As a newbie, I have seen the statement "foo (bar)" mentioned 
> in books and and even on this site. I haven't yet seen what 
> this actually mean as I can assume that its just for 
> examples. If I am wrong please explain in detail what this is about.
> 
> Thanks,
> JC
> 

-
**
PLEASE NOTE: The above email address has recently changed from a previous
naming standard -- if this does not match your records, please update them
to use this new name in future email addressed to this individual.This
message and any attachments are intended for the   individual or entity
named above. If you are not the intended  recipient, please do not forward,
copy, print, use or disclose this   communication to others; also please
notify the sender by   replying to this message, and then delete it from
your system. The Timken Company
**


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

RE: Microsoft Word and Perl

[Ichim, Adrian N.]

>   
>   my $newdoc = $word->ActiveDocument;
>   foreach my $obj_Story ($newdoc->StoryRanges ){
>$obj_Story->Fields->{Update};   ==> Cannot find object
>while ($obj_Story->NextStoryrange != ""){
> $obj_Story = $obj_Story->NextStoryRange;
> $obj_Story->Fields->{Update};==> Cannot find object
>}
>   }


Could you try instead

foreach my $obj_Story (@{$newdoc->StoryRanges}) {
  .
  ...
  }

As I remember from my past experience with Win32::OLE stuff, Perl doesn't 
know that $newdoc->StoryRanges is a list, therefore you need to be more
explicit.

Adrian Ichim


**
PLEASE NOTE: The above email address has recently changed from a previous naming 
standard -- if this does not match your records, please update them to use this new 
name in future email addressed to this individual.

This message and any attachments are intended for the 
individual or entity named above. If you are not the intended
recipient, please do not forward, copy, print, use or disclose this 
communication to others; also please notify the sender by 
replying to this message, and then delete it from your system. 

The Timken Company
**


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

RE: Incrementing count

[Ichim, Adrian N.]

 
> - Original Message -
> From: <[EMAIL PROTECTED]>
> To: 
> Sent: Monday, March 29, 2004 6:20 AM
> Subject: Incrementing count
> 
> 
> > I'm sorry, the previous subject should have been changed. 
> My apologies.
> >
> >
> >   while () {
> >$counter++;
> > }
> >
> > I know this is probably simple, but how would I increment by 20? In 
> > other words, $counter would increment 1 time for every 
> twenty lines of the file?
> Any
> > help would be appreciated.
> >
> 
>while () {
> $counter=$counter +20;
>  }

The result I think the OP wants to achieve is:

$counter = $line = 0;
while ()
{
$counter++  unless ($line++ % 20);
}

This one increments $counter every time $line is an multiple of 20.

Even better :

$counter = 0;
while ()
{
$counter++  unless ($. % 20);
}

[See perldoc perlvar]

Adrian Ichim



**
PLEASE NOTE: The above email address has recently changed from a previous naming 
standard -- if this does not match your records, please update them to use this new 
name in future email addressed to this individual.

This message and any attachments are intended for the 
individual or entity named above. If you are not the intended
recipient, please do not forward, copy, print, use or disclose this 
communication to others; also please notify the sender by 
replying to this message, and then delete it from your system. 

The Timken Company
**


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

RE: Microsoft Services for UNIX/LINUX

[Ichim, Adrian N.]

>  What I would like to do is to enable 
> users to simply map UNIX-based drives on which their 
> applications reside, and then click on selected applications 
> (since most of them are used to the Microsoft point-and-click 
> or Run tool).
> 
> I was wondering if anyone on this list have had any luck with 
> this technique of executing UNIX-based applications.  One 
> thing that comes to mind is CGI-scripting, but this is not an 
> option for me.
> 
> every comment/suggestion/pointers will be very much appreciated.
> 
> Thank you.
> 
> __
> 
> William Ampeh (x3939)
> 
> 

I don't know if MS Services for Unix may run Unix apps by "point and click",

but I have seen a nice software called Tarantella, that is able to integrate

Unix/Linux & Windows apps on the same graphical desktop. 
It requires its own app. server (Unix/Linux), but it is scalable and
reliable. 
The manufacturer was SCO, before the acquisition of its OS division by
Caldera. 
The company is now called Tarantella (www.tarantella.com) - you can download
a demo 
and try the product to see if it fits your purpose.

Adrian Ichim


**
PLEASE NOTE: The above email address has recently changed from a previous naming 
standard -- if this does not match your records, please update them to use this new 
name in future email addressed to this individual.

This message and any attachments are intended for the 
individual or entity named above. If you are not the intended
recipient, please do not forward, copy, print, use or disclose this 
communication to others; also please notify the sender by 
replying to this message, and then delete it from your system. 

The Timken Company
**


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

RE: Encrypting PERL source code...

[Ichim, Adrian N.]

> -Original Message-
> From: [EMAIL PROTECTED]
> 
> Can anyone suggest where I might be able to find (hopefully a freeware 
> or shareware script..) a program that runs either on a windows system 
> or a PERL script that would "encrypt" a perl script by doing
> such things as
> removing whitespace, etc. so that it is much more difficult 
> to read but
> yet will execute as if "unencrypted"?? I'd like to make the 
> source code
> as difficult to pirate as I can for a program that I'm developing.
> Thanks!

A pretty decent way to hide your code may be this one: 
try a "perl-to-exe" transformation, followed by a compression
of the resulting executable (in the UPX style).

NOTE: perl2exe programs are not free, AFAIK. The executables
made by certain trialware perl2exe programs attempt to read 
data from their own executable image files stored on disk. 
This kind of executables are not good candidates for "on the fly" 
compression/decompression. 

Of course, this is not a bulletproof encryption, but only 
a weak method to hide your code. Feel free to experiment ...


**
PLEASE NOTE: The above email address has recently changed from a previous naming 
standard -- if this does not match your records, please update them to use this new 
name in future email addressed to this individual.

This message and any attachments are intended for the 
individual or entity named above. If you are not the intended
recipient, please do not forward, copy, print, use or disclose this 
communication to others; also please notify the sender by 
replying to this message, and then delete it from your system. 

The Timken Company
**


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]