Well, I think I've fixed most of the newbie mistakes thanks to forum help.
I also found out that the x'15' is the character under EBCDIC, so had to
change my regex. Here's the new code snip..
open (VDOSLOG, ">$VIRUS_DLOG") or die "Error cannot open dos virus log: $!";
while( ) {
# s/\x0A/\x
On Oct 25, Rice, Elizabeth A. said:
>2- I get "Illegal Hexadecimal Digit '\' ignored" against the line that has
>the regex. If I change the regexto s/\xa/\xda/g
> then I no longer get this error, but still no output is given. This is
>on OS/390 Unix. I'm not sure if EBCDIC is messing
>> on OS/390 there is no unix2dos command available. So, if I use the file
as
>> is, it is sent in the email but it comes out with no carriage returns,
etc.,
>> making the file unreadable when it is of any significant size.
>You can use a simple oneliner in Perl to convert text files see
>htt
"Rice, Elizabeth A." wrote:
> on OS/390 there is no unix2dos command available. So, if I use the file as
> is, it is sent in the email but it comes out with no carriage returns, etc.,
> making the file unreadable when it is of any significant size.
You can use a simple oneliner in Perl to conve
I am modifying a perl script that was originally written for a Solaris
platform, where the unix2dos system command is available. The script puts
text and filenames into a log file, then runs unix2dos command against the
log file, then ships it off as part of a sendmail command.
on OS/390 there