installation activeperl

Hi all,

I am new in active perl and in programming in general.
I have installed activeperl, wrote the first little test-scripts and run them on DOS cmd.

How can I install a scripting help (e.g. colored text)

Thanks for your help on this basic problem.

Eveline



_______________________________________________
ActivePerl mailing list
ActivePerl@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Re: installation activeperl

You could try out Komodo Edit:
http://www.activestate.com/Products/komodo_ide/komodo_edit.m html

Graham Stuart

Eveline Geiser wrote:
> Hi all,
>
> I am new in active perl and in programming in general.
> I have installed activeperl, wrote the first little test-scripts and run them on DOS cmd.
>
> How can I install a scripting help (e.g. colored text)
>
> Thanks for your help on this basic problem.
>
> Eveline
>
>
>
> _______________________________________________
> ActivePerl mailing list
> ActivePerl@listserv.ActiveState.com
> To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
_______________________________________________
ActivePerl mailing list
ActivePerl@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Re: installation activeperl

> How can I install a scripting help (e.g. colored text)

Code syntax highlight/coloring is done by the editor and there are many
of those. ActiveState's Komodo is one (there's a free version). Scite,
Vim even Eclipse can do it. It can be a personal thing and the "which
is best" battle often gets heated - usually the one you know is the best ;->

Try a couple sites like perlmonks.org or perl.com for FAQs w/ lists of
editors.

I use vim (winx and *nix) myself.

a

--
Andy Bach, Sys. Mangler
Internet: andy_bach@wiwb.uscourts.gov
VOICE: (608) 261-5738 FAX 264-5932

The only function of economic forecasting is
to make astrology look respectable.
- John Kenneth Galbraith


_______________________________________________
ActivePerl mailing list
ActivePerl@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Re: installation activeperl

Using XP I just use Notepad ++. It color codes in a multitude of
languages. And it is free. or it was last year....

Joe Deal



Andy Bach wrote:
> > How can I install a scripting help (e.g. colored text)
>
> Code syntax highlight/coloring is done by the editor and there are many
> of those. ActiveState's Komodo is one (there's a free version). Scite,
> Vim even Eclipse can do it. It can be a personal thing and the "which
> is best" battle often gets heated - usually the one you know is the best ;->
>
> Try a couple sites like perlmonks.org or perl.com for FAQs w/ lists of
> editors.
>
> I use vim (winx and *nix) myself.
>
> a
>
>

_______________________________________________
ActivePerl mailing list
ActivePerl@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

RE: installation activeperl

Hello
Or you can try http://www.contexteditor.org/
Erich

-----Original Message-----
From: activeperl-bounces@listserv.ActiveState.com
[mailto:activeperl-bounces@listserv.ActiveState.com] On Behalf Of Graham
Stuart
Sent: Thursday, March 20, 2008 12:17 PM
To: Eveline Geiser
Cc: activeperl@listserv.ActiveState.com
Subject: Re: installation activeperl

You could try out Komodo Edit:
http://www.activestate.com/Products/komodo_ide/komodo_edit.m html

Graham Stuart

Eveline Geiser wrote:
> Hi all,
>
> I am new in active perl and in programming in general.
> I have installed activeperl, wrote the first little test-scripts and
run them on DOS cmd.
>
> How can I install a scripting help (e.g. colored text)
>
> Thanks for your help on this basic problem.
>
> Eveline
>
>
>
> _______________________________________________
> ActivePerl mailing list
> ActivePerl@listserv.ActiveState.com
> To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
_______________________________________________
ActivePerl mailing list
ActivePerl@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
_______________________________________________
ActivePerl mailing list
ActivePerl@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Server 2003 NTBackup Log Files

Hi All,

I've got a couple of problems with checking backup log files generated by
windows 2003 server ntbackup. First and biggest problem is that
backup[01-10].log files are unicode and when I open them and check for
different strings I get no matches as it opens them in unicode and not
ascii. I've searched everywhere for unicode to ascii conversion but can't
find anything. Is there a simple way to open or convert the log file as
ascii so I can do what I need to do? Here's the code I'm using to open the
file:

open(LOG,"<$backup_log_absol");
flock(LOG, 2);
my (@backlog) = ;
close (LOG);

Pretty standard but useless!!

Secondly, although not really a problem, is there any way I can condense the
following code:

opendir DIR, $log_dir or die "Error reading $log_dir: $!n";
my @sorted = sort {-M "$log_dir/$b" <=> -M "$log_dir/$a"}
readdir(DIR);
closedir DIR;
my(@logfiles);
foreach (@sorted) {
unless (($_ eq ".") or ($_ eq "..") or ($_ eq "fred.bks")) {
push @logfiles, "$_";
}
}
my $newestfile = $logfiles[-1];

As you can see I'm opening the ntbackup log file directory away in docs &
settings to find the newest file thats not ".", ".." or "fred.bks". It seems
dirty code to me and I'm sure it could be written better.

Thanks in advance for any help,

Ewen

_______________________________________________
ActivePerl mailing list
ActivePerl@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

RE: Server 2003 NTBackup Log Files

--===============0292731908==
Content-Type: multipart/alternative;
boundary="_2b4940c8-19a5-4ce2-9a24-39f7ce5882ac_"

--_2b4940c8-19a5-4ce2-9a24-39f7ce5882ac_
Content-Type: text/plain; charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable


I had the same problem. After a few hours of pulling out my hair I found th=
at the log files are full of nulls padding each letter. I had to something =
like s/\x00// to kill all of the nulls.
=20
Damon> From: ewen@nuttyp.co.uk> To: activeperl@listserv.ActiveState.com> Su=
bject: Server 2003 NTBackup Log Files> Date: Thu, 20 Mar 2008 19:52:44 +000=
0> CC: perl-win32-admin@listserv.activestate.com> > Hi All,> > I've got a c=
ouple of problems with checking backup log files generated by> windows 2003=
server ntbackup. First and biggest problem is that> backup[01-10].log file=
s are unicode and when I open them and check for> different strings I get n=
o matches as it opens them in unicode and not> ascii. I've searched everywh=
ere for unicode to ascii conversion but can't> find anything. Is there a si=
mple way to open or convert the log file as> ascii so I can do what I need =
to do? Here's the code I'm using to open the> file:> > open(LOG,"<$backup_l=
og_absol");> flock(LOG, 2);> my (@backlog) =3D ;> close (LOG);> > Pret=
ty standard but useless!!> > Secondly, although not really a problem, is th=
ere any way I can condense the> following code:> > opendir DIR, $log_dir or=
die "Error reading $log_dir: $!n";> my @sorted =3D sort {-M "$log_dir/$b" =
<=3D> -M "$log_dir/$a"}> readdir(DIR);> closedir DIR;> my(@logfiles);> fore=
ach (@sorted) {> unless (($_ eq ".") or ($_ eq "..") or ($_ eq "fred.bks"))=
{> push @logfiles, "$_";> }> }> my $newestfile =3D $logfiles[-1];> > As yo=
u can see I'm opening the ntbackup log file directory away in docs &> setti=
ngs to find the newest file thats not ".", ".." or "fred.bks". It seems> di=
rty code to me and I'm sure it could be written better.> > Thanks in advanc=
e for any help,> > Ewen> > _______________________________________________>=
ActivePerl mailing list> ActivePerl@listserv.ActiveState.com> To unsubscri=
be: http://listserv.ActiveState.com/mailman/mysubs
____________________________________________________________ _____
How well do you know your celebrity gossip?
http://originals.msn.com/thebigdebate?ocid=3DT002MSN03N0707A =

--_2b4940c8-19a5-4ce2-9a24-39f7ce5882ac_
Content-Type: text/html; charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable






I had the same problem. After a few hours of pulling out my hair I found th=
at the log files are full of nulls padding each letter. I had to something =
like s/\x00// to kill all of the nulls.

 

Damon

> From: ewen@nuttyp.co.uk
> To: activeperl@listserv.A=
ctiveState.com
> Subject: Server 2003 NTBackup Log Files
> Date=
: Thu, 20 Mar 2008 19:52:44 +0000
> CC: perl-win32-admin@listserv.act=
ivestate.com
>
> Hi All,
>
> I've got a couple of=
problems with checking backup log files generated by
> windows 2003 =
server ntbackup. First and biggest problem is that
> backup[01-10].lo=
g files are unicode and when I open them and check for
> different st=
rings I get no matches as it opens them in unicode and not
> ascii. I=
've searched everywhere for unicode to ascii conversion but can't
> f=
ind anything. Is there a simple way to open or convert the log file as
&=
gt; ascii so I can do what I need to do? Here's the code I'm using to open =
the
> file:
>
> open(LOG,"<$backup_log_absol");
&g=
t; flock(LOG, 2);
> my (@backlog) =3D <LOG>;
> close (LOG=
);
>
> Pretty standard but useless!!
>
> Secondly=
, although not really a problem, is there any way I can condense the
>=
; following code:
>
> opendir DIR, $log_dir or die "Error read=
ing $log_dir: $!n";
> my @sorted =3D sort {-M "$log_dir/$b" <=3D&g=
t; -M "$log_dir/$a"}
> readdir(DIR);
> closedir DIR;
> my=
(@logfiles);
> foreach (@sorted) {
> unless (($_ eq ".") or ($_=
eq "..") or ($_ eq "fred.bks")) {
> push @logfiles, "$_";
> }<=
BR>> }
> my $newestfile =3D $logfiles[-1];
>
> As you=
can see I'm opening the ntbackup log file directory away in docs &
=
> settings to find the newest file thats not ".", ".." or "fred.bks". It=
seems
> dirty code to me and I'm sure it could be written better. >>
> Thanks in advance for any help,
>
> Ewen
>=
;
> _______________________________________________
> ActivePe=
rl mailing list
> ActivePerl@listserv.ActiveState.com
> To unsu=
bscribe: http://listserv.ActiveState.com/mailman/mysubs

Re: Server 2003 NTBackup Log Files

Hi Ewen,
the files are normally UTF-16 encoded. When you open it in notepad and you
choose "Save as", you see it. Open the log files by

open LOG,"<:encoding(UTF-16)",$backup_log_absol;

and it should work. Perhaps you have to remove the first bytes afterwards.
It is the BOM (byte order mark).
Bye
Torsten

________________________________________________________


|---------+------------------------------------------->
| | "Ewen Marshall" |
| | |
| | Sent by: |
| | activeperl-bounces@listserv.Acti|
| | veState.com |
| | |
| | |
| | 20.03.2008 20:52 |
| | |
|---------+------------------------------------------->
>----------------------------------------------------------- ------------------------------------------------------------ -|
| |
| To: |
| cc: perl-win32-admin@listserv.activestate.com |
| Subject: Server 2003 NTBackup Log Files |
>----------------------------------------------------------- ------------------------------------------------------------ -|




Hi All,

I've got a couple of problems with checking backup log files generated by
windows 2003 server ntbackup. First and biggest problem is that
backup[01-10].log files are unicode and when I open them and check for
different strings I get no matches as it opens them in unicode and not
ascii. I've searched everywhere for unicode to ascii conversion but can't
find anything. Is there a simple way to open or convert the log file as
ascii so I can do what I need to do? Here's the code I'm using to open the
file:

open(LOG,"<$backup_log_absol");
flock(LOG, 2);
my (@backlog) = ;
close (LOG);

Pretty standard but useless!!

Secondly, although not really a problem, is there any way I can condense
the
following code:

opendir DIR, $log_dir or die "Error reading $log_dir: $!n";
my @sorted = sort {-M "$log_dir/$b" <=> -M "$log_dir/$a"}
readdir(DIR);
closedir DIR;
my(@logfiles);
foreach (@sorted) {
unless (($_ eq ".") or ($_ eq "..") or ($_ eq "fred.bks")) {
push @logfiles, "$_";
}
}
my $newestfile = $logfiles[-1];

As you can see I'm opening the ntbackup log file directory away in docs &
settings to find the newest file thats not ".", ".." or "fred.bks". It
seems
dirty code to me and I'm sure it could be written better.

Thanks in advance for any help,

Ewen

_______________________________________________
ActivePerl mailing list
ActivePerl@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs



_______________________________________________
ActivePerl mailing list
ActivePerl@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

RE: Server 2003 NTBackup Log Files

This is not a Perl answer but you may try logparser which is a powerful too=
l that allows you to submit
SQL over many filetypes including MS logfiles.
http://www.microsoft.com/downloads/details.aspx?FamilyID=3D8 90cd06b-abf8-4c=
25-91b2-f8d975cf8c07&displaylang=3Den =

Bour9

> -----Message d'origine-----
> De : activeperl-bounces@listserv.ActiveState.com =

> [mailto:activeperl-bounces@listserv.ActiveState.com] De la =

> part de Torsten.Werner@assyst-intl.com
> Envoy=E9 : mardi 25 mars 2008 09:12
> =C0 : Ewen Marshall
> Cc : activeperl@listserv.ActiveState.com
> Objet : Re: Server 2003 NTBackup Log Files
> =

> Hi Ewen,
> the files are normally UTF-16 encoded. When you open it in =

> notepad and you
> choose "Save as", you see it. Open the log files by
> =

> open LOG,"<:encoding(UTF-16)",$backup_log_absol;
> =

> and it should work. Perhaps you have to remove the first =

> bytes afterwards.
> It is the BOM (byte order mark).
> Bye
> Torsten
> =

> ________________________________________________________
> =

> =

> |---------+------------------------------------------->
> | | "Ewen Marshall" |
> | | |
> | | Sent by: |
> | | activeperl-bounces@listserv.Acti|
> | | veState.com |
> | | |
> | | |
> | | 20.03.2008 20:52 |
> | | |
> |---------+------------------------------------------->
> =

> >----------------------------------------------------------- --
> -----------------------------------------------------------|
> | =

> |
> | To: =

> |
> | cc: perl-win32-admin@listserv.activestate.com =

> |
> | Subject: Server 2003 NTBackup Log Files =

> |
> =

> >----------------------------------------------------------- --
> -----------------------------------------------------------|
> =

> =

> =

> =

> Hi All,
> =

> I've got a couple of problems with checking backup log files =

> generated by
> windows 2003 server ntbackup. First and biggest problem is that
> backup[01-10].log files are unicode and when I open them and check for
> different strings I get no matches as it opens them in unicode and not
> ascii. I've searched everywhere for unicode to ascii =

> conversion but can't
> find anything. Is there a simple way to open or convert the =

> log file as
> ascii so I can do what I need to do? Here's the code I'm =

> using to open the
> file:
> =

> open(LOG,"<$backup_log_absol");
> flock(LOG, 2);
> my (@backlog) =3D ;
> close (LOG);
> =

> Pretty standard but useless!!
> =

> Secondly, although not really a problem, is there any way I =

> can condense
> the
> following code:
> =

> opendir DIR, $log_dir or die "Error reading $log_dir: $!n";
> my @sorted =3D sort {-M "$log_dir/$b" <=3D> -M "$log_dir/$a"}
> readdir(DIR);
> closedir DIR;
> my(@logfiles);
> foreach (@sorted) {
> unless (($_ eq ".") or ($_ eq "..") or ($_ eq "fred.bks")) {
> push @logfiles, "$_";
> }
> }
> my $newestfile =3D $logfiles[-1];
> =

> As you can see I'm opening the ntbackup log file directory =

> away in docs &
> settings to find the newest file thats not ".", ".." or "fred.bks". It
> seems
> dirty code to me and I'm sure it could be written better.
> =

> Thanks in advance for any help,
> =

> Ewen
> =

> _______________________________________________
> ActivePerl mailing list
> ActivePerl@listserv.ActiveState.com
> To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
> =

> =

> =

> _______________________________________________
> ActivePerl mailing list
> ActivePerl@listserv.ActiveState.com
> To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
> =

> =

_______________________________________________
ActivePerl mailing list
ActivePerl@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs