Charles K. Clarkson wrote:
John Doe <[EMAIL PROTECTED]> Wrote:
:
: Hello all,
: i have problem, and i don't know where is my mistake.
Your first mistake is not describing the problem in
your message. A good programmer realizes that help comes
best if the problem is stated clearly.
Your se
John Doe <[EMAIL PROTECTED]> Wrote:
:
: Hello all,
: i have problem, and i don't know where is my mistake.
Your first mistake is not describing the problem in
your message. A good programmer realizes that help comes
best if the problem is stated clearly.
Your second mistake was not to in
Hi John.
See my reply in line.
John Doe wrote:
>
> Hello all,
> i have problem, and i don't know where is my mistake.
>
> ---
> #!/usr/bin/perl
use strict; # always
use warnings; # usually
which means that all your variables need to be declared with 'my'.
> @myarra = ("test","error","blo
Corrceted One:
@myarra = ("test","error","block");
$file = 'sorted'; # File contain records xxx.xxx.xxx
# i need last symbols after last -> .
open(FILE, $file);
while ($data = ) {
$backupdata = $data;
$data =~ s/^(\S+)\.//g; # Remove xxx.xxx. get last 2 or 3 symbols
#chomp($data);
$d
