Basically,
if i have 50 records, with X,Y and comments column(comments is empty column at start). My motive is based on the values of X and Y column I have to populate comments column.
If value of X is greater than 20
then I traverse the Y records till the value of Y reaches 5, If the...
Hi
I am accessing a dbf file with lots of records. This is the portion of code where I am having confusion about!
CODE
while ($i<=$rdb->last_record)
{
my @data = $rdb->get_record($i,"X", "Y"
if($data[2]<20)
{
$comment = "Good"...
Hi Steve,
1. What is a 'bad record'?
Keep looking until speed value is greater than 5. The records you are looking are bad records( Sorry for bringing in "bad". You can ignore the word bad)
2. How can velocity be > 20 if speed is not also > 20? - Speed and velocity are just names of...
Hi I am accessing a dbf file with lots of records. This is the portion of code where I am having confusion about!
while ($i<=$rdb->last_record)
{
my @data = $rdb->get_record($i,"Speed", "Velocity"
if($data[2]<20)
{
$comment = "Good"...
#!C:\perl\bin
use Date::Day;
use warnings;
use XBase;
use POSIX;
use Data::Dumper;
my $chunk_old;
my @processor_num;
my @files= <Sample.dbf>;
foreach $file(@files)
{
my $rdb = new XBase($file);
$wfile=$file;
$wfile="sm_c.dbf";
my $wdb=XBase->create("name"=>$wfile,
"field_names"...
X Y Z
1 2 2
1 3 1
1 6 3
New chunk 5
5 2 2
5 3 1
New Chunk 2
2 8 8
2 1 -7
Taking initial Y value for each chunk to be 0
It should write a new column named Z
The function I mentioned is to find the difference between the prev value of Y and the current value of Y ( for each chunk X) and put the value in Z.
Any help would be appreciated.
Hey all,
I have a doubt regarding the structure of my loop.
I have a dbf file which has lot of records and fields. I open the dbf file and set the descriptor with this line.
$wdb->set_record($i,$data[1],$data[2]) - from the .dbf file
File Sample.dbf has structure like this
X Y
1 r
1 3
1...
Hey all,
Need help with this problem
1. I have a huge data file which consists of millions of records.
2. There is a chunk column which has chunks of counters in it
Ex -
Chunk Processor
1 1
1 2
1 2
1 3
1 0
1...
Hi I am new to using MIDlets, and I wanted to create a simple TCP client server program.. I found a tutorial in J2me forums and I am able to send a single message from server(PC) to client(Phonemulator) and from client to server. But I want to send a stream of messages to the server. Here is my...
#
# Autogenerated by Thrift
#
# DO NOT EDIT UNLESS YOU ARE SURE THAT YOU KNOW WHAT YOU ARE DOING
#
require 5.6.0;
use strict;
use warnings;
use Thrift;
use Types;
# HELPER FUNCTIONS AND STRUCTURES
package Battleship2_registerClient_args;
use base qw(Class::Accessor)...
Hi all,
I was trying to solve Battleship puzzle using perl. But I wanna know how to register client..When I checked the other thrift compiler generated files(other languages), client can be registered using Battleship::Client->new($socket)..
But I dont find any such modules in...
Hi
Yeah the number of zeros is variable..And if its even it can be either way..have n-1/2 preceding non zero number and rest anteceding number. all values are strictly numeric..
AND PREX!
What I am doing is reading from a DBF file using Xbase connector and I am trying to smooth out values...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.