Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?

Re: How to store the data fetched from the database in perl

by frozenwithjoy (Priest)
on Jun 11, 2013 at 06:18 UTC ( #1038195=note: print w/replies, xml ) Need Help??

in reply to How to store the data fetched from the database in perl

#!/usr/bin/env perl use strict; use warnings; use feature 'say'; use Data::Printer; # populating your hash my %data = map { chomp; $_ => 1 } <DATA>; # for your example, might look something like this: # my %data = map { $_ => 1 } $sth->fetchrow(); # do you mean fetchrow_ +array? # two ways to check whether key exists in hash say "ABC exists" if exists $data{'ABC'}; say "JKL exists" if $data{'JKL'} == 1; p %data; __DATA__ ABC JKL HGJ KJI GHJ LKJ


{ ABC 1, GHJ 1, HGJ 1, JKL 1, KJI 1, LKJ 1 } ABC exists JKL exists

Replies are listed 'Best First'.
Re^2: How to store the data fetched from the database in perl
by rajsai28 (Novice) on Jun 11, 2013 at 06:38 UTC

    I have used below code while fetching data from the sql but i got the output as below

    $sth->execute ($lBOA_BLC_MASTER_ID) or die "Cannot execute: " . $sth-> +errstr(); %data = map { $_ => 1 } $sth->fetchrow();


    $VAR1 = 'ABC'; $VAR2 = 1;
    thanks and regards,
      fetchrow fetches one row at a time. If you want to fetch all the rows, use fetchall_arrayref. See DBI.
      لսႽ ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ
      Try using my $hr_data = $dbh->selectall_hashref('SELECT DISTINCT EMP_NAME FROM EMPLOYEE', [ 'EMP_NAME' ]);
      This fetches all data in one go.
      You can then use say "ABC exists" if exists $hr_data->{ABC}; to check if an element is there.

      I haven't used this module before, so am not totally familiar with this method, but does this work?

      my %data; while ( my $result = $sth->fetchrow() ) { $data{$result} = 1; }

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1038195]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (3)
As of 2018-03-18 08:55 GMT
Find Nodes?
    Voting Booth?
    When I think of a mole I think of:

    Results (229 votes). Check out past polls.