05-31-2005
read file line by line and use strtok(), if user names are seperated by space. and then use strcmp() with each token to compare user names.
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
Hi All,
I'm new to perl,
My requirement is to check if particular file exists.
e.g. filename.txt, filename1.txt, filename2.txt etc
I tried the below code:-
my $var1 = "filename.txt"
if ( -e ($var1 = ~ /file\w/))
{
print "File found \n";
}
else
{ print "File not found \n";
}
... (0 Replies)
Discussion started by: doitnow
0 Replies
2. Shell Programming and Scripting
Hi all
I have a file with below content (content is variable whenever new product is launched). I need form a grep command like this
egrep "Unknown product|Invalid symboland so on"
How to do it using a script?
Unknown product
Invalid symbol
No ILX exch found
exceeds maximum size
AFX... (4 Replies)
Discussion started by: johnl
4 Replies
3. Programming
Hi,
I have large files with fixed length fields or fields seperated by delimeter. I would like to do validation on some or all fields to check for numeric or date or characters etc.. I would like to write this in C++. Please let me know if any one have any ideas on this.
Thanks for all... (2 Replies)
Discussion started by: rameshmelam
2 Replies
4. Shell Programming and Scripting
Hi all,
I would like to print words in a file seperated by whitespaces containing a specific pattern like "="
e.g. I have a file1 containing strings like
%cat file1
The= some= in
wish= born
<eof> .I want to display only those words containing = i.e The= , some=,wish=
... (5 Replies)
Discussion started by: sree_123
5 Replies
5. UNIX for Dummies Questions & Answers
I have a file with words that begin with character #. Whenver that character is found that word should be deleted throughout the file. How do I do that in VIM.
e.g:
afkajfa ladfa ljafa #222222 kjafad ljl
afajkj kjlj uouu #44444 jlkj lkjl
Output should be
afkajfa ladfa ljafa kjafad... (1 Reply)
Discussion started by: osbourneric
1 Replies
6. Shell Programming and Scripting
Hi,
file -> temp.txt
cat temp.txt
/home/pradeep/123/a_asp.html
/home/pradeep/123/a_asp1.html
/home/pradeep/435/a_asp2.html
/home/pradeep/arun/abc/a_dfr.html
/home/pradeep/arun/123/a_kir.html
/home/pradeep/123/arun/a_dir.html
....
....
..
i need to get a_*.html(bolded strings... (4 Replies)
Discussion started by: pradebban
4 Replies
7. Shell Programming and Scripting
Hello dear Unix shell professionals,
I am desperately trying to get a seemingly simple logic to work. I need to extract words from a text line and save them in an array. The text can look anything like that:
aaaaaaa${important}xxxxxxxx${important2}ooooooo${importantstring3}...I am handicapped... (5 Replies)
Discussion started by: Grünspanix
5 Replies
8. Shell Programming and Scripting
Hi Guys..
I have a file and i want to extract all words that starts with a pattern 'ABC_' or 'ADF_'
For example,
ABC.txt
----
INSERT INTO ABC_DLKFJAL_FJKLD
SELECT DISTINCT S,B,C FROM ADF_DKF_KDFJ_IERU8 A, ABC_LKDJFREUE9_FJKDF B
WHERE A.FI=B.EI;
COMMIT;
Output : ABS_DLKFJAL_FJKLD,... (5 Replies)
Discussion started by: Pramod_009
5 Replies
9. Shell Programming and Scripting
Hi
I need to do a patten match between files .
I am new to shell scripting and have come up with this so far. It take 50 seconds to process files of 2mb size . I need to tune this code as file size will be around 50mb and need to save time.
Main issue is that I need to search the pattern from... (2 Replies)
Discussion started by: nitin_daharwal
2 Replies
10. UNIX for Beginners Questions & Answers
I have file1 and file2 as shown below,
file1:
((org14/1-131541:0.11535,((org29/1-131541:0.00055,org7/1-131541:0.00055)1.000:0.10112,((org17/1-131541:0.07344,(org23/1-131541:0.07426,((org10/1-131541:0.00201,org22/1-131541:0.00243)1.000:0.02451,
file2:
org14=india
org29=america... (5 Replies)
Discussion started by: dineshkumarsrk
5 Replies
LEARN ABOUT SUSE
cyrus::imap::imsp
IMAP::IMSP(3) User Contributed Perl Documentation IMAP::IMSP(3)
NAME
Cyrus::IMAP::IMSP - Perl module for Cyrus IMSP user options
SYNOPSIS
use Cyrus::IMAP::IMSP;
my $client = Cyrus::IMAP::IMSP->new('imsphost'[, $port[, $flags]]);
$rc = $client->set('mailreader.window.size', '200x300');
%options = $client->get('mailreader.*')
$rc = $client->unset('mailreader.window.size');
DESCRIPTION
This module is a Perl interface to the Cyrus IMSP functions that relate to user options (preferences). Only three IMSP operations are
implemented: set, unset, and get.
METHODS
new($server[, $port[, $flags]])
Instantiates a Cyrus::IMAP::IMSP object. This is in fact a Cyrus::IMAP object with a few additional methods, so all Cyrus::IMAP
methods are available if needed. (In particular, you will always want to use the "authenticate" method.)
error
Return the last error that occurred, or undef if the last operation was successful. This is in some cases (such as "get") the only way
to distinguish between a successful return of an empty list and an error return.
Calling "error" does not reset the error state, so it is legal to write:
%options = $client->get($option);
print STDERR "Error: ", $client->error if $client->error;
set($option, $value)
Sets the option named by $option to the value in $value.
There are no restrictions or quoting rules needed to protect special characters in the value argument. (The Cyrus::IMAP layer will take
care those details by adding double quotes or a literal introducer.)
If successful, returns 1. Otherwise, returns undef and makes an error message available through the "error" function.
unset($option)
Removes the option named by $option. The option is completely removed from the user's name space but will revert to a site-wide default
if one has been set. Note that this is different from assigning an option the null value with set($option, '').
If you try to unset an option that does not exist, an error is returned saying that the option was already unset.
If successful, returns 1. Otherwise, returns undef and makes an error message available through the "error" function.
get($option_pattern)
Get takes either an option name or a pattern of names to fetch. The pattern can contain either "*" or "%" wildcards anywhere in the
string. The usual IMAP wildcard semantics apply.
The return value is a hash of options with each key being an option name and each value being the option's value string. If an empty
hash is returned, it's either because there were no matching options or because some error happened. Check the "error" function to see
which was the case.
The IMSP protocol also returns an access flag of "[READ-WRITE]" or "[READ-ONLY]" but that information is discarded by this function. A
more complicated function that returns both the value and the access flag could be added later if needed.
AUTHOR
Brandon S. Allbery, allbery@ece.cmu.edu IMSP modifications by Joseph Jackson, jackson@CMU.EDU
SEE ALSO
Cyrus::IMAP perl(1), cyradm(1), imapd(8).
perl v5.12.1 2002-05-25 IMAP::IMSP(3)