Help for this page

Select Code to Download


  1. or download this
    DBD::mysql::st execute failed: Query was empty at otest.pl line 56.
    SQL error:$DBI::errstr
    
  2. or download this
    print "Symbol: $h1{'symbol'}\tExpn_date: $exp\tStrike: $h1{'strike'}\t
    +Bid: $h1{'bid'}\tAsk: $h1{'ask'}\tLast: $h1{'last'}\tOpen: $h1{'open'
    +}\tVolume: $h1{'volume'}\n ";
    
    my $ins_rec="INSERT INTO $table (symbol,expn_dt,strike,open,bid,ask,la
    +st,volume) VALUES(\'$h1{'symbol'}\',\'$exp\',\'$h1{'strike'}\',\'$h1{
    +'open'}\',\'$h1{'bid'}\',\'$h1{'ask'}\',\'$h1{'last'}\',\'$h1{'volume
    +'}\');";
    
  3. or download this
    my $dbh=DBI->connect($dsn,$user,$pwd) || die "could not connect to dat
    +abase:$error\n";
    
  4. or download this
      my $sth=$dbh->prepare($ins_rec);
    
         $sth->execute || die "SQL error:$error\n";