03-22-2001
Here is one perl script. Check for errors then have a try.
#!/usr/bin/perl
$PassMark = 40;
$InputFile = "filename";
$OutPutFile = "results";
open (INPUTFILE, "$InputFile") || die "Error Reason $!";
@DATA=<INPUTFILE>;
close(INPUTFILE);
open (RESULTFILE, ">$OutPutFile") || die "Error Reason $!";
foreach $Record(@DATA) {
chomp($Record);
my($Fname, $Sname, $Mark) = split(/ /, $Record);
if($Mark >= $PassMark) {
print RESULTFILE "$Fname $Sname PASS\n"; $s++;
} else {
print RESULTFILE "$Fname $Sname FAIL\n"; $f++;
}
}
close(RESULTFILE);
print "$f students Passed, $f Failed(don't hate them
![Smilie Smilie](https://www.unix.com/images/smilies/smile.gif)
)\n";
exit;
GoodLuck..!!
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
I had different problem scenarios with IF statement. Can any expert please enlighten me on the difference with these scenarios. Thank you.
1st Scenario:
testdate=`date +%Y%m`
test=`cat /var/log/database0.$testdate*.log | grep "Errors found during processing" | tail -10`
if
then
... (4 Replies)
Discussion started by: filthymonk
4 Replies
2. UNIX for Advanced & Expert Users
This is for a program I have to do to calculate the day of the week.
I need to write an if statement that will do the following:
if day is 29 and year is odd, don't calculate dayif ( day == 29 && year == ??? )I know how to do it for the day but I don't know how to do it for the year. (4 Replies)
Discussion started by: pwanda
4 Replies
3. Shell Programming and Scripting
I am kind of new in Unix and i have to make a menu. I want to put an if statement in the menu. you should enter the filename and it goes to that file. How do i do this? (1 Reply)
Discussion started by: trob
1 Replies
4. UNIX for Dummies Questions & Answers
Hi, I am trying to write a for statement that will allow for the ps, who, finger, and date commands to run. Can anyone help? I use Putty. (22 Replies)
Discussion started by: lexydoll87
22 Replies
5. Shell Programming and Scripting
Good morning all!
I want to know if Im interpreting this if statement below right.
if(((1) || (0)) && (1)){
do stuff;
}
This is saying: if true piped into false, then true, then do stuff. Right?
What does the && stand for?
thanks in advance!
ben (3 Replies)
Discussion started by: bigben1220
3 Replies
6. Shell Programming and Scripting
I am writing a script that does a search for a argument in a file and lists all like occurrences. The script verifies that it is a file and then runs another script that list the lines. My problem is that I need the script to accept a file or a directory and then go to that directory check all... (1 Reply)
Discussion started by: zero3ree
1 Replies
7. Shell Programming and Scripting
Hi
I am very new to Unix programming and shell scripting. I am trying t figure out how to write a little script that will output the number of directories. I can find the number of directories using ls -l | grep "^d" | wc -l I can not figure out how to do it so when I type the name... (8 Replies)
Discussion started by: Reddoug
8 Replies
8. Shell Programming and Scripting
Hi guys,
Two problems I need solving please. I created a script where the user types in 7 numbers as standard input and each one is then stored in an array. Now I need to perform the following calculations on those numbers:
1) Use a while loop to determine the largest number in the range.
... (2 Replies)
Discussion started by: jjb1989
2 Replies
9. Homework & Coursework Questions
1. The problem statement, all variables and given/known data:
Two problems I need solving please. I created a script where the user types in 7 numbers as standard input and each one is then stored in an array. Now I need to perform the following calculations on those numbers:
1) Use a while... (11 Replies)
Discussion started by: jjb1989
11 Replies
10. UNIX for Dummies Questions & Answers
I came across a bash script that outputs the forecast for the day and the max temperature but at the end of the day the max temperature disappears ($6) and I am left with "°C" after the forecast.
Here is the script:
#! /bin/bash
curl -s --connect-timeout 30... (7 Replies)
Discussion started by: _light_
7 Replies
LEARN ABOUT MOJAVE
mail::spf::v2::record5.18
Mail::SPF::v2::Record(3) User Contributed Perl Documentation Mail::SPF::v2::Record(3)
NAME
Mail::SPF::v2::Record - Sender ID ("spf2.0") record class
SYNOPSIS
See Mail::SPF::Record.
DESCRIPTION
An object of class Mail::SPF::v2::Record represents a Sender ID ("spf2.0") record.
Constructors
The following constructors are provided:
new(%options): returns Mail::SPF::v2::Record
Creates a new Sender ID ("spf2.0") record object.
%options is a list of key/value pairs representing any of the following options:
text
terms
global_mods
See "new" in Mail::SPF::Record.
scopes
Required. See "new" in Mail::SPF::Record. The 'mfrom' and 'pra' scopes are supported. There is no default.
new_from_string($text, %options): returns Mail::SPF::v2::Record; throws Mail::SPF::ENothingToParse, Mail::SPF::EInvalidRecordVersion,
Mail::SPF::ESyntaxError
Creates a new Sender ID ("spf2.0") record object by parsing the string and any options given.
Class methods
The following class methods are provided:
version_tag_pattern: returns Regexp
Returns a regular expression that matches a version tag of 'spf2.0/' plus a comma-separated list of any of the 'mfrom' and 'pra'
scopes. The following are valid version tags:
spf2.0/mfrom
spf2.0/pra
spf2.0/mfrom,pra
spf2.0/pra,mfrom
default_qualifier
results_by_qualifier
See "Class methods" in Mail::SPF::Record.
Instance methods
The following instance methods are provided:
text
scopes
terms
global_mods
global_mod
stringify
eval
See "Instance methods" in Mail::SPF::Record.
version_tag: returns string
Returns 'spf2.0/' plus a comma-separated list of the scopes of the record. See "version_tag_pattern" for a list of possible return
values.
SEE ALSO
Mail::SPF, Mail::SPF::Record, Mail::SPF::Term, Mail::SPF::Mech, Mail::SPF::Mod
<http://tools.ietf.org/html/rfc4408>
For availability, support, and license information, see the README file included with Mail::SPF.
AUTHORS
Julian Mehnle <julian@mehnle.net>, Shevek <cpan@anarres.org>
perl v5.18.2 2017-10-06 Mail::SPF::v2::Record(3)