Beefy Boxes and Bandwidth Generously Provided by pair Networks
laziness, impatience, and hubris

Comment on

( #3333=superdoc: print w/replies, xml ) Need Help??

I'm not sure you pasted actual code, as that would warn a lot. Why did you comment 'use strict;'? And why is 'use warnings;' missing? I am absolutely sure it will give you all the hints you need …

my $dbh = DBI->connect($server,$user,$passwd,$dbd, {RaiseError => 1,Au +toCommit => 1 }); ^? read the docs again # Prepare the SQL query for execution my $sql = "SELECT $ans_rid, $ans_qcn, $ans_loc FROM ft_int_tbl WHERE $ +ans_rid is not null"; ^? ^? ^? ^ +? my $sth = $dbh->prepare($sql) or die "Couldn't prepare statement:$DBI: +:errstr; stopped"; ^? you set RaiseError, so you'll never g +et that # Execute the query $sth->execute() or die "Couldn't execute statement: $DBI::errstr; stop +ped"; ^? same here #open JKLL, ">$an_dt_file" or die "can't open file $ansb_detail_file f +or write,\n"; # Fetch each row and print it while ( my ($ans_rid, $ans_qcn, $ans_loc) = $sth->fetchrow_array() ) { my ($ansb_cktid, $ansb_mcn, $ansb_soc) = unpack("A3 A3 A3", $_); ^? what do + you expect to be in $_ #print JKLL"Field 1: $ansb_cktid Field 2:$ansb_mcn Field 3: $ansb_soc +\n"; print "Field 1: $ansb_cktid Field 2:$ansb_mcn Field 3: $ansb_soc \n"; } ==> corrected based on guesses, as I have no idea my $dbh = DBI->connect ($server, $user, $passwd, { RaiseError => 1, PrintError => 1, # Comes in very handy when you are runni +ng into trouble ShowErrorStatement => 1, # this too AutoCommit => 1, }); # Prepare the SQL query for execution my $sql = "SELECT ans_rid, ans_qcn, ans_loc FROM ft_int_tbl WHERE ans_ +rid is not null"; my $sth = $dbh->prepare ($sql); # Execute the query $sth->execute (); #open JKLL, ">$an_dt_file" or die "can't open file $ansb_detail_file f +or write,\n"; # Fetch each row and print it while (my ($ans_rid, $ans_qcn, $ans_loc) = $sth->fetchrow_array ()) { my ($ansb_cktid, $ansb_mcn, $ansb_soc) = unpack "A3 A3 A3", $ans_l +oc; print "Field 1: $ansb_cktid Field 2:$ansb_mcn Field 3: $ansb_soc \ +n"; }

Enjoy, Have FUN! H.Merijn

In reply to Re: Extracting only required length in a column in perl DBI by Tux
in thread Extracting only required length in a column in perl DBI by Thomas Kennll

Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post; it's "PerlMonks-approved HTML":

  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.
  • Log In?

    What's my password?
    Create A New User
    [GrandFather]: I haven't any "working code" to inspect! I have to find ways to generate reference signals then check the numbers I get at the far end match.
    [GrandFather]: That's ok when the signal is a voltage, but there are three axis accelerometers, gyroscopes and magnetometers in these things! A little invention is needed at times!
    [Corion]: GrandFather: Yeah, in that aspect, hardware is far more a black box than software
    [GrandFather]: Oh, and the manufacturer tells lies too! I'm sure they don't mean to, but I know for sure some of the stuff they say is just wrong. It's possible they don't understand what we are asking, but that's not a good look either
    [Corion]: GrandFather: Ah, unit testing hardware is fun, especially when the hardware is uncalibrated ...
    [GrandFather]: Us: "What scaling do we need to apply to the numbers from the SDK for the wibble?". Them: "Oh, the numbers from the SDK for the wibble are already correct, they don't need scaling"
    [GrandFather]: In our code: wibble range 1 scale by 1, range 2 scale by 2, range 3 scale by 4, range 4 scale by 8

    How do I use this? | Other CB clients
    Other Users?
    Others surveying the Monastery: (6)
    As of 2017-08-24 07:14 GMT
    Find Nodes?
      Voting Booth?
      Who is your favorite scientist and why?

      Results (365 votes). Check out past polls.