Help for this page

Select Code to Download


  1. or download this
    view_quote.pl: Use of uninitialized value in string ne at C:\scripts\v
    +iew_quote.pl line 147.
    
  2. or download this
    use Finance::YahooQuote;
    my @quotes = getcustomquote(["$symbol"], # using custom format
    ...
    print "$symbol Float Shares: $float";
    }
    unless ($found) { print "No quote info. for symbol: $symbol"; }
    
  3. or download this
            if (${$_}[4] ne "") { $float = "${$_}[1],${$_}[2],${$_}[3],${$
    +_}[4]"; }