$file=$ARGV[0] || die "File not found $!";
my %uni=();
open (FH,"sort $file|");
$reccnt=0;
while (<FH>)
{
$line=$_;
my @details=split('\t',$line);
[EMAIL PROTECTED];
$reccnt+=1;
}
$file=$ARGV[0] || die "File not found $!";
my %uni=();
open (FH,"sort $file|");
$reccnt=0;
while (<FH>)
{
$line=$_;
my @details=split('\t',$line);
[EMAIL PROTECTED];
$reccnt+=1;
}
How do i read the values of @details trought the
$record array;
i want something like this
print $record[1][1] ==> this would refer to the first
element in the @details. (this doesnt work)
Any idea how i could do this..
thanks in advance
jabir
--- Adriano Ferreira <[EMAIL PROTECTED]> wrote:
> On 10/1/05, Octavian Rasnita <[EMAIL PROTECTED]>
> wrote:
> > perl -MModuleName -e1
>
> You can even find out the version you have installed
> with
>
> perl -M'ModuleName 999' -e1
>
> where 999 is a too large version number. For example
>
> $ perl -M'lib 999' -e1
> lib version 999 required--this is only version
> 0.5565.
> BEGIN failed--compilation aborted.
>
> means you have C<lib> installed with version 0.5565.
> Or
>
> $ perl -M'Foo 999' -e1
> Can't locate Foo.pm in @INC (...
>
> which says you don't have Foo installed.
>
> If you want a more elegant output you can try the
> CPAN modules
> Module::Info and Module::Which.
>
> Cheers,
> Adriano.
>
> --
> To unsubscribe, e-mail:
> [EMAIL PROTECTED]
> For additional commands, e-mail:
> [EMAIL PROTECTED]
> <http://learn.perl.org/>
> <http://learn.perl.org/first-response>
>
>
>
I do the diffcult immediately,but the impossible take's a little longer!!!
Cresent canaopy apartments
#19 Davis Road,
Thomas town,
Bangalore -84
Phone (mobile) : +91-98867 01148
E-Mail: [EMAIL PROTECTED],[EMAIL PROTECTED]
______________________________________________________
Yahoo! for Good
Donate to the Hurricane Katrina relief effort.
http://store.yahoo.com/redcross-donate3/
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
