Hello all,
I use linux.
whenever we write a perl script we use
#!/usr/bin/perl -w
at the beginning. What does -w means here?
Is it perl specific or linux interpreter needs it?
--
Regards,
Rahul Patil
> "PK" == Parag Kalra writes:
PK> use strict;
PK> use warnings;
good.
PK> my %mean_values;
PK> while(){
PK> chomp;
PK> my ($key, $value) = split (/\t/,$_);
PK> if ( exists $mean_values{$key} ){
PK> push @{$mean_values{$key}}, $value;
PK> } else {
PK>
Hope this helps:
#!/usr/bin/perl
# Author: Parag Kalra
# Date: 19-SEPT-2010
use strict;
use warnings;
my %mean_values;
while(){
chomp;
my ($key, $value) = split (/\t/,$_);
if ( exists $mean_values{$key} ){
push @{$mean_values{$key}}, $value;
} else {
${$mean_values{$key}}[