slash question
If I want the following field to contain forwarded slashes - this is for a linux box, as follows. $dir=//ITC/home/techs; How do I get the forward slashes in there? I have tried: $dir ='//ITC'; $dir ='//ITC'; $dir =`//ITC`; Nothing works. Help. Thank you - Susan -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
slash
If I want the following field to contain forwarded slashes - this is for a linux box, as follows. $dir=//ITC/home/techs; How do I get the forward slashes in there? I have tried: $dir ='//ITC'; $dir ='//ITC'; $dir =`//ITC`; Nothing works. Help. Thank you - Susan -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
ASN1.pm
I am getting an error can't locate ASN1.pm, I have tracked that down to - I need Convert-BER-1.25.tar.gz. I have downloaded the file. I cannot find the documents on this download, where to unzip and load, etc... Does anybody know. Thanks - Susan -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
ASN1.pm
I am getting an error can't locate ASN1.pm, I have tracked that down to - I need Convert-BER-1.25.tar.gz. I have downloaded the file. I cannot find the documents on this download, where to unzip and load, etc... Does anybody know. Thanks - Susan -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
Net::LDAP.pm
Hello, Can anyone tell me why I am receiving an error can't locate Net/LDAP.pm in @ INC (@INC includes /usr/lib/perl5/5.6.1 etc, etc etc, etc. Thanks - Susan -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
Net::LDAP
Hello, Can anyone tell me why I am receiving an error can't locate Net/LDAP.pm in @ INC (@INC includes /usr/lib/perl5/5.6.1 etc, etc etc, etc. Thanks - Susan P.S - No, I am not a Student. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
using an AND operator
Is there an AND operator in perl? For example;
if ($SRF=1 and $SRL=1) {printYES;)
Any help would be appreciated.
Thank you - Susan
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Post Method versus Get Method
I know the POST Method the data is sent to STDIN, and GET method the data is attached to the URL and then submitted. When and why would you want to use the GET method versus the POST method. Is is because of firewalls? or what? I would appreciate any input on this subject. Thank You. Susan Evans -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
strip first space
If I have a string and the first character is a space, may not always be a space. Example: John Tommy Beth John and Beth have a space, Tommy does not. How do I strip that. I do not want to use the global command because a want the space between First and Last name. Any suggestions? Susan Information Technology Center 828-627-8314 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
ignore spaces in files
I have been writing Perl code for (1) week as of today. Thanks to the
beginner user e:mail, and thank you to John Edwards, and
[EMAIL PROTECTED], and other input I have learned from this page. I have
put togther the following. It works well, and is doing what I want it to
do. Except, 1 little problem remains. Please read the below, and I would
appreciate any advice.
I have tried trim and chomp with no results.
Thank You Susan. (P.S. - I am not a student - I work in the ITC
department.)
This routine opens 15 different school files, for this example, I have
shorten it to 1 school. It creates a data file
call STNAME.DAT. This file contains, last name, first name, student #,
and school #. I then open STNAME, look for
duplicates using ( first 5 char's of last name+1 char of first name).
Look in arrary does it exist. if yes, add a counter to name.
I then store this in a result file, called result.dat. What my question
is, how do I strip out the spaces on the last name if the last
name is not 5 char. long. example: ASHE J 123456 396.
Example: open(FILE396,396.TXT) or die $!; # open file for input
SCHOOLS INDIV. FILE
print OUT
substr($_,12,5),substr($_,30,1),substr($_,3,9),
,substr($_,0,3),\n
while FILE396;
close(FILE396);
# CREATE result file, look for duplicates add counter on name, rebuild
string
my %names;
open(I,STNAMES.DAT) or diename: $!\n; # open student consolidated
names
open(O,results.dat) or dieresults: $!\n; # result file open
output
foreach $line(I)
{
my $name=substr($line,0,6);
my $workingname=$name;
my $counter=1;
while(exists($names{$workingname}))
{
$workingname=$name.$counter;
$counter++;
}
$names{$workingname}=$workingname;
print O $workingname,substr($line,7,13),\n; # add back
Student #
# School #
}
# The file below is results.dat (if last name is less than 5 chars. it
fille in spaces. I want the spaces gone)
LINDSD 5 314
LINDS1 13065 314
LINDS2 225 396
LINDS3 11125 378
LOCK S 90174 314
LOKE J 14013 314
LONDOS 13009 314
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
$foo
I am learning Perl, so this may seem a dumb question to the advance Perl Programmers. What exact purpose does $foo do? Example $foo=$_. What benefit do I get from making the input string $foo? Every place I look I do not get a clear understanding or picture of $foo. Thank you Susan -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
Re: Help me out
I took your advice and added the following code to my source code. I want to print
the students name to the result
file regardless if I add a number on the end of the student name or not. I have
tried putting the PRINT O
at different location in this code. I can not get it to print to the result file.
WHY and HELP!!
Thank You
Susan
open(I,'STNAMES.DAT') or die$!; # open student consolidated names
open(O,'results') or dieresults: $!\n; # result file open output
$c=1;
$foo=substr($_,0,26);# strip out only the student last name and first name.
while(exists($student{$foo})){ # if the students is used already
$foo= $_$c; # add the numer to it
$_=$foo,substr($_,27,20); # add the remainder of the file back on to input
string
$c++; # increment the number }
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
sort file
What is the fastest or best way to sort a file alphabetically, the rewrite it to a file. Thanks Susan Haywood County Schools -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
[Fwd: Returned mail]
---BeginMessage--- --- The message cannot be delivered to the following addresses. --- [EMAIL PROTECTED]Mailbox unknown or not accepting mail. 550 5.1.1 [EMAIL PROTECTED]... User unknown --- Original message included (or as an attachment) --- ---BeginMessage--- ---BeginMessage--- What is the fastest or best way to sort a file alphabetically, the rewrite it to a file. Thanks Susan Haywood County Schools -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] ---End Message--- ---End Message--- ---End Message--- -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
