scripting infant

[Rocket]

Hi,
I am totally new to this, so i dont mind the abuse that may be hurled at my lame question.

I need to create a script reads a text file, then works out weekly gross and net pay for each person. if the person earns over $1000, they get charged at 50%, and if they earn less its 38%.

The opening and writing to a file im all cool with, but i have nfi where to go from there, lame huh?

Just a gentle nudge in the right direction would probaly suffice, as I would prefer to know what it is I am doing.


TIA

Rocket

[redhead]

In what script-language ? php ? *sh ? perl ? or perhaps since you're using alot of calculation based uppon the input, some programming language like C/C++

[Rocket]

PERL.
sorry, its late

[idx]

What's the text file format look like?

Basically (depending on the data and size of it) you can read everything into a hash then loop through and calculate.

-r

[Rocket]

name,wage,hours

eg camilla,45,20

[Rocket]

oh, its pretty small too,

[idx]

while(<>) {
   chomp;
   s/\r//g;
   my ($name, $wage, $hours) = split(/\,/);
   print "NAME=$name\tWAGE=$wage\tHOURS=$hours\n";
}

So just run like:

./script_name input_file

So once you have the data in a variable you can do whatever you need. The logic for looking at the wage > 1000 should be pretty straight forward.

-r

[Rocket]

thanx heaps, now im pointed in the right direction, just have to work out what all that did, i think i got it

thanx again

[redhead]

In short psudocode:

while theres lines in the file
   read one
   replace '\r' with nothing (making sure every line ends with a '\n')
   split the line into three containers with ',' as the seperation char.
   print out whats filled into the containers

[Rocket]

Hey,
Just one more thing, it seems to only be taking the last name and numbers from the file, and i cant work out for the life of me why...

otehr than that, all seems to be working fine.
thanx yet again

[idx]

How are the names formatted? (I assume you're saying that it's missing the first name)

replace '\r' with nothing (making sure every line ends with a '\n')

Actually chomp is removing the '\n' so $_ is a clean line.

-r

[Rocket]

No, i mean it is onll taking one name from the file.
it is in following format:

pete,50,20
mary,34,23
dave,98,34
sue,23,34

there are only four names, and it only seems to tally the last name and numbers on the list.
I kept playing and plaiying, gpt most of the other stuff sorted, very messy indeed.
but no matter what i did, i couldnt work out how to make it tally all names in the file, here is my script so far, and thanx for the help,

open NAME, 'namedate.txt' || die "cannot open namedate.txt: $!\n";
open NAME2, '>nam2.txt' || die "cannot open nam2.txt: $!\n";
chomp;
while(<NAME>) {
   @num=($name, $wage, $hours) = split(/\,/);
   $total=($wage * $hours);
}

if  ($total>1000) {
 $taxed=($total/2)
}

elsif ($total<1000){
	$taxed=($total*.38)
}

$tax=($total-$taxed);

print NAME2 "NAME= $name\n\nWAGE=\$ $wage\tHOURS= $hours\n NET=\$$total\tGROSS=\$$taxed\ttax payed=\$$tax";
close NAME;
close NAME2;

the @num array was originally a my statement, but i was to lame to even get that going, hehe

thanx again

[idx]

Well, for good paranioa you should keep chomp; and the s/\r//g; line in there just after the while statement. They clean up the input line.

@num - yeah remove that.

If you run my original script, does it print all the names and wage/hours data from the file?

-r

[idx]

Just looked at the code again and noticed the part I missed. (must be late)

Note your if logic with $total. You placed it outside the while loop structure. You have to put it before the closing } of while so it executes on each line of the file.

-r

[Rocket]

No, i couldnt get it to print anything to output file, my fault im sure,

I placed the if statement inside the while loop, and seem to be getting the first name only now, a little bit closer, and I am kinda learning something,