test

Regards javeed **Disclaimer Information contained in this E-MAIL being proprietary to Wipro Limited is 'privileged' and 'confidential' and intended for use only by the individual or entity to which it is addressed. You are notifie

test mail

**Disclaimer** Information contained in this E-MAIL being proprietary to Wipro Limited is 'privileged' and 'confidential' and intended for use only by the individual or entity to which it is addressed. You are notif

somemodule.pm

Hi all can any of u give me somemodule.pm Regards j@veed

RE: expression

Thanks gibbs Regards j@veed

expression

Hi All, Here is my part of script: Script: @replicas=`cleartool lsreplica -s`; foreach $rep (1..$#replicas) {#print "$replicas[$rep] \n"; print " $rep= $replicas[$rep] \n"; } print "For which replica do you like to SYNC\n"; print "Make you choice\n"; my $choice=<>; chomp$choice; When

outlook

Hi All, I am working on win2000( outlook), i have a question,depending on the message contents i need to do some further processing , is it possible to automatically copy the contents of the mail( i.e body contents) to your local drive or is it possible to take it in an array in PERL. Regards

RE: FILTER

- From: David Samuelsson (PAC) [mailto:[EMAIL PROTECTED]] Sent: Tuesday, November 19, 2002 3:05 PM To: Javeed SAR; [EMAIL PROTECTED] Subject: RE: FILTER I wouldnt use perl for this. In outlook you have an rules wizard that can move mails when they arrive to a diffrent folder, but yes its sure is

FILTER

Hi, Can i filter incoming e-mails. I am using exchange server (outlook) on win2k. For example if i have send a mail with an attachement to a particular id say [EMAIL PROTECTED] , i want the perl scipt to see that it move the attachement to local drive of my system. Is it possible.?? Regards

mail

Hi All, i get mails to a particular id in outlook. In perl i want to know how to move this attachments to do a particular activity is it possible. Regards j

pattern

Hi all, I want to input a string which is used to create file name, and I want to allow input string to consist of letters(SDK) at the start and only IR and DEV inbetween, and numbers(0-9) and underscore( _ ) within file name. Is the pattern right.

pattern

> Hi all, > I want to input a string which is used to create file name, and I want to > allow input string to consist of letters(SDK) at the start and only IR and > DEV inbetween, and numbers(0-9) and > underscore( _ ) within file name. > Is the pattern right. > m/^SDK[0-9]|^SDK_[0-9]|^SDK_[0-

RE: hard coded

No I have kept the vob names? I don't need all the vobs. i.e the reason i am reading from file. Regards j@veed -Original Message- From: David Samuelsson (PAC) [mailto:David.Samuelsson@;pac.ericsson.se] Sent: Monday, November 04, 2002 1:29 PM To: Javeed SAR; [EMAIL PROTECTED] Su

hard coded

Hi all, i am reading certain label names from textfile stored in a particular machine. I am working on WIN2k. For eg here i have kept it in machine blrk35ed. This becomes hard coded, is there any other way to read label names, because i dont' want to hard coded in my script. open(FILE,"

pattern

Hi all, I want to input a string which is used to create file name, and I want to allow input string to consist of letters(SDK) at the start and only IR and DEV inbetween, and numbers(0-9) and underscore( _ ) within file name. Is the pattern right. m/^SDK[0-9]|^SDK_[0-9]|^SDK_[0-9]_IR|^SDK_[0-9

splitting

Hi all, i have big files, i want to split it and do a ftp to other sites, at the other site i should be able to join them and execute them, any of you are doing this type of thing, can anyone help me?? TIA

split files and join

Hi all, i have big files, i want to split it and do a ftp to other sites, at the other site i should be able to join them and execute them, any of you are doing this type of thing, can anyone help me?? TIA

RE: Splitting A large data file

Re: Splitting A large data file > > > Javeed Sar wrote: > > > > How to combine it back after split??? > > > > perl -e 'print <>' splitfile.1 splitfile.2 splitfile.3 splitfile.4 > splitfile.5 > splitfile.new.txt > > note the ordering is

RE: Splitting A large data file

How to combine it back after split??? Regards j@veed -Original Message- From: Todd W [mailto:trw3@;uakron.edu] Sent: Thursday, October 24, 2002 10:36 AM To: [EMAIL PROTECTED]; James Kipp Subject: Re: Splitting A large data file James Kipp wrote: > I am working on a Windows NT box

uppercase

Hi All, I have a script which accepts input from keyboard,here it is $label_tag, i want to convert it to upper case, if the input from keyboard is given in lowercase, in my script? How to do that? print "\n\nENTER THE LABEL NAME:\n"; my $label_tag=<>; chomp$label_tag;

array

Hi All, i want to get the last part in an array @help from the following output: M:\jav_test\train\final\cs1.txt i.e: @help must have cs1.txt TIA

excluding @@

Hi all, I want get the last part of this sentence excluding @@ i.e i should get my output in a variable($put) like this for the following sentence: EnternalID_GetDateofBirth.vbp M:\jav_test\Technical_Docs\.@@\main\int_1_2b\techdoc_1_2b\2\Common_Controls\ main\int_1_2b\techdoc_1_2b\1\Code_Exam

spaces in a variable

Hi, How to remove spaces in a variable? For eg if i have variable $te $te = $attr_tag . $date; chomp$te; print "$te"; Gives me output as follows: SYNC_CHECKWed Oct 9 12:20:53 2002 I want to remove all the spaces in output variable $te. Regards javeed

unix grep equivalent in PERL

Hi all, What is the UNIX grep equivalent in perl? For eg: @vobs=`cleartool lsvob -s -host blrk4005a|grep $vob_tag`; here the grep is UNIX grep? What about in perl is there any function equivalent? Regards j

RE: statement

Thanks to all of you, especially Gibbs. I got it. Regards j -Original Message- From: Sudarshan Raghavan [mailto:[EMAIL PROTECTED]] Sent: Monday, October 07, 2002 1:46 PM To: Perl beginners Subject: RE: statement On Mon, 7 Oct 2002, Javeed SAR wrote: > sorry about that. >

RE: statement

To: Perl beginners Subject: RE: statement On Mon, 7 Oct 2002, Javeed SAR wrote: > > > This is my script, what changes should i make. How am I supposed to say that if you are not going to post the error message? > > > #+ > #!c:\perl\bin\perl Have you trie

RE: statement

No error messages, It prints: cleartool desc attype:SYNC_CHECK@vob://train Regards j -Original Message- From: Tanton Gibbs [mailto:[EMAIL PROTECTED]] Sent: Monday, October 07, 2002 12:53 PM To: Javeed SAR; Sudarshan Raghavan; Perl beginners Subject: Re: statement What does your

RE: statement

nton Gibbs [mailto:[EMAIL PROTECTED]] Sent: Monday, October 07, 2002 12:45 PM To: Javeed SAR; Sudarshan Raghavan; Perl beginners Subject: Re: statement > @cmd_merge=`cleartool lstype -kind attype -s -invob \\$cmd1`; Here you use backslashes \\ > @attt = "cleartool desc attype:$cmd

RE: statement

`` instead of '' or "" . If you > want to use `` then don't use $cmd2 or split the > string into many. Variables do get interpolated inside backticks. They do not get interpolated inside single quotes (''). Did you try it out? > > --- Javeed SAR <[EMAI

statement

Hi All, I am executing a command from command line, it working fine,when i give in perl it's not working. The command which i gave in command line is : c:>cleartool desc attype:SYNC_CHECK@vob:/train what i gave in perl is as follows: I am passing the variable here instead of SYNC_CHECK. @at

RE: Regular expression

Hi All, I have the following output in array @attt I want the last line, in this output (SYNC_CHECK = "HELLO") in a variable $out. What should the regular expression be? attribute type "SYNC_CHECK" created 04-Oct-02.09:36:42 by javeed.clearuser@BLRK35ED "for testing" owner: HIS\javeed

Regular expression

I have the following output in array @attt I want the last line in a variable $out. What should the regular expression be? attribute type "SYNC_CHECK" created 04-Oct-02.09:36:42 by javeed.clearuser@BLRK35ED "for testing" owner: HIS\javeed group: HIS\clearuser scope: this VOB (ordinary

RE: inputs to my script.

From: Robin Cragg [mailto:[EMAIL PROTECTED]] Sent: Monday, September 23, 2002 3:34 PM To: Javeed SAR; [EMAIL PROTECTED] Subject: Re: inputs to my script. If you want multiple words to be treated as one argument, just enclose them in quotes... R At 15:26 23/09/2002 +0530, Javeed SAR wrote: >Hi a

inputs to my script.

Hi all, I am giving 4 command line inputs to my script. I want to give the 4 input($com) which has spaces in it input, eg: Hello how do you do How should i take the bold font as single input?? How should i check it in my script? if( scalar(@ARGV) != 4 ) { print "Enough Arguments are not given

How to grep

Hi All, I have a output as follows: I like to grep first two lines(it should be in loop) ==>Line 1& ==>Line 2 Oplog IDs for row "ERL_ComEPR_Project_Management" (@ eh20417c): ==>Line 1 oid:9534a99c.142611d4.a2d5.00:90:27:cc:b7:c8=5467 (BLR_ComEPR_Project_

grep for highlighted

HI all, When i execute a command the output is like as follows: I want to grep for things which are highlighted in blue colour. How to do this??? Oplog IDs for row "BLR_ComEPR_ADT" (@ blrk4005a): oid:d9782f3d.48f111d4.a2eb.00:90:27:cc:b7:c8=176502 (BLR_ComEPR_ADT) oid:07112e91.ee38402a

Reguler expression????????

> HI all, > > When i execute a command the output is like as follows: > > I want to grep for things which are highlighted in blue colour. > How to do this??? > > > > Oplog IDs for row "BLR_ComEPR_ADT" (@ blrk4005a): > oid:d9782f3d.48f111d4.a2eb.00:90:27:cc:b7:c8=176502 (BLR_ComEPR_A

replace

Hi, I have \\blrk35ed\views\test_merge.vws in a variable $tmpview1 How to replace \\blrk35ed\views\test_merge.vws with blrk35ed\\views\\test_merge1.vws TIA jav

Regular expression

I have a statement as follows; I need to split them into 3 parts; * test_merge1 \\blrk35ed\views\test_merge1.vws LIke this: $var1 should have * $var2 should have test_merge1 $var3 should have \\blrk35ed\views\test_merge1.vws TIA Jav

RE: change directories

really want to cd thru a script why dont you write a batch file Javeed Sar wrote: > Hi, > > I printed the statement: > print cwd; > it's in right path, but the program comes out in c:\, i want the cursor to > be in m:\test_merge1, in this dir i am executing a command, w

RE: change directories

-Original Message- From: Sudarshan Raghavan [mailto:[EMAIL PROTECTED]] Sent: Tuesday, September 10, 2002 6:58 PM To: Perl beginners Subject: Re: change directories On Mon, 9 Sep 2002, Javeed SAR wrote: > Hi, > > How to change drives. > > For eg if i am in c: right now i want

change directories

Hi, How to change drives. For eg if i am in c: right now i want to move to M: Am i doing the right thing : chdir " M:\\test_merge1" ; Regards Javeed

RE: like an exe file

yes i got it, you can use perl2exe/ Thanks. Regards Javeed -Original Message- From: Sudarshan Raghavan [mailto:[EMAIL PROTECTED]] Sent: Saturday, September 07, 2002 7:35 PM To: Perl beginners Subject: RE: like an exe file On Fri, 6 Sep 2002, Javeed SAR wrote: > > what i

RE: like an exe file

what is this perl2exe function? Can i use this? Regards Javeed -Original Message- From: Sudarshan Raghavan [mailto:[EMAIL PROTECTED]] Sent: Saturday, September 07, 2002 7:12 PM To: Perl beginners Subject: Re: like an exe file On Fri, 6 Sep 2002, Javeed SAR wrote: > Hi all, >

like an exe file

Hi all, I have perl scripts , i don't want anybody to open it or see? It should be like an exe file Is it posible? Regards Javeed

RE: avoid creating directories in a particular path

Hi, I have written a function ,got it ,thanks for ur help, Regards Javeed -Original Message- From: Sudarshan Raghavan [mailto:[EMAIL PROTECTED]] Sent: Thursday, September 05, 2002 1:30 PM To: Perl beginners Subject: Re: avoid creating directories in a particular path On Wed, 4 Sep

avoid creating directories in a particular path

Hi all, How should i avoid creating directories in a particular path? For Eg under DSP directory i should not allow any directory to be created.. Regards Javeed

matching file extension .vbp and .dsp

Hi, I am reading dirextory using ls. How to match for .dsp and .vbp file extensions Is this right? if ($file1 =~ m/\.vbp$/)

conditional statement

Hi all, I am using 2 conditional statements, as follows: if (($vbpcount==1) ||($dspcount==1)) { die "\n\nThe element ($PN) is not allowed to be added to ClearCase,Because a project already exists.\n"; } elsif(($vbpcount==1) && ($dspcount==1)) {die "\n\nThe element ($PN) is not allowed to b

conditions

Hi all, How to set condition for the following: i am reading a dir by using ls command. if files with extension .dsp file or extension .vbp file is not there in folder u add it to folder and sendmail i.e ok. if file with extension .dsp is there and file with extension .vbp is added to folder i

regular expression

Hi all, @file=`ls $ja`; #Here the output is a list of files: cp.exe eula.txt test2.vbp.mkelem test3.vbp # I want to grep for files with .dsp or .vbp extensions here, if the number of files with extension .dsp or .vbp is > 1 i should exit saying project exists. or else send mail. am i do

regular exp

Hi, I am getting a path from variable $ja,if i print $ja i get: M:\jav_test\ADT\View_Controller_VB\SDKComponents\ADTModel Note: this path varies everytime. $file=`ls $ja`; If i excute above statement ,In the directory ADTModel, i get a list of files,i have to grep for files with extensio

how to do this?

Hi All, I have a folder, this folder REMARK, this folder should have only one file with filextension .DSP or .VBP.only one file should exist, if it is not there we can add that file to folder. it already exist it should not add the file, it should come out with error "proj exist". i.e folder

errrorrrrrrr

hi, What i am doing in this script, if .vbp or .dsp exists the $counter should be incremented. If $counter >=1 it should say the projct already exist. I have a doubt, it is giving syntax error as follows: syntax error at \\blrk35ed\javeed\proj.pl line 51, near "}" Execution of \\blrk35ed\ja

if statement

I have a small doubt; My script is given below: What it is doing is once the first condition is satisfied it is dieing, that is if (($check_out == 0) I want the if statement to compare this also: (($var5 == "Soarian_Context_Sensitive_Coordination_File") | ($var5 == "comEPRHelp") | ($var5

splitting string

hi All, I have string as given below: M:\sun1\train\test\Soarian_Context_Sensitive_Coordination_File >From this string i need to split indivually and get Soarian_Context_Sensitive_Coordination_File ---> in one variable. test --->

beginner

Hi, I am giving a command in command prompt: c>ct checkout -unreserved. i want to do this: see if -unreserved exists in command prompt , if it exist just exit. How to grep the word -unreservedin perl from the above command line? Regards Javeed

del files

I want to delete files. I am not able to delete , what is the wrong thing I am doing here. I am able to see the file in @privates I am getting following output: 0 deleted Attempting to delete M:\jav_test\train\k k k.mkelem.mkelem #!c:\perl\bin\perl @privates =`cleartool lsprivate -ta

NET

Hi All, I am using (given below) net use in batch files, how to do the same in perl That is: net use u: /del do net use u: Regards javeed -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

format

Hi all, when i execute the command given below: $cmd = `blrk2254d\\post\\postie\\postie.exe -host:$SMTP_SERVER -to:SAR.Javeed\@sisl.co.in -cc:@EMAIL_TO_LIST1 -from:$ENV{'CLEARCASE_USER'}\@sisl.co.in -s:\"$SUBJECT\" -msg:\"$file is added to clearcase by $user \",\"time is :$date \",\" the o

perl help

> > HI, > > > i want to push the contents of array @MSG (Given below) to a file call > testblat.txt. > so that i can assign as follows: > $message = "testblat.txt "; > > How to do it?? > > > > > > > > > > > my @MSG = > ("Trigger activation mail notification for controlled actio

MAIL

Hi, I am using a perl script which sends mail after certain activity, This script uses smtp, my question is i want a script which uses TCP/IP(X400) for sending mails. The script which i am using is given below, it works fine, but i need something which uses TCP/IP(X400) . my @MSG = ("Tr

perl prob?

Hi, I am a begginer in perl? i have a doubt. when i create a file it should not have space bar in it's file name; eg help file if it is there it should not create the file, it should throw a error message "space in file name not allowed" can u help me in this. regards javeed

Perl

Hi all, I want to know if anyone is using perl scripts for automation to work on clearcase. regards javeed