Re: extracting data from a file

[nithins]

in reply to extracting data from a file

moving each word in to a variable that too dynamically creating it during the run time is not possible by the best of knowledge i know

but u can dump it in to an hash which will create key value same as that of characters b/w " "

hope this code might help u

#!/usr/bin/perl

use strict;
use Data::Dumper;

open ( FH ,'<' , 'D:\\myperlpgm\\nperl\\newfile.txt');

my %has;
my @array;

while(<FH>){
@array = split /"/;
}


print "@array\n";

for(@array){
$has{$_} = $_ ;
}

print  Dumper ($has{ssss});

D:\\myperlpgm\\nperl\\newfile.txt contains -> "nithn""nnnn""ssss" data

[davido]

Huh?

What is the hash for?

And take a closer look at what's in @array. By changing "print "@array\n"; to "print Dumper @array;", you will see that @array contains extra elements that result from splitting on the quote character as if it were a simple delimiter rather than a balanced construct.

Also, given the OP's data set, there's no reason for the $hash{ssss} element to even exist.

This is a broken solution.