I managed to delete invalid data from RRD output using splice

for my $index (reverse 0..$#f) {

if ( $f$index =~ /nan/ ) {

splice(@f, $index, 1, ());

}

}

Thanks to all Perl Monks for your support and your time.

I really enjoyed way perl works

dpprabhuindia