Length of String

2003-01-17 Thread Ho, Tony
Hi guys Do you know whether there is a function in perl to find the size of a string ? For example, "06" would be size 2. Cheers Tony

RE: Multi-dimensional arrays and subroutines - PLEASE IGNORE PREVIOUS EMAIL

2002-07-17 Thread Ho, Tony
Hi Guys I have just resolved the problem. The problem was the array variable "array_given" in the subroutine. I replaced : my @array_given = $_[0]; with my @array_given = @_; It works fine. Thanks for the help. Tony > -Original Message- > From: Ho, Tony &

Multi-dimensional arrays and subroutines

2002-07-17 Thread Ho, Tony
Hi Guys I was wondering if you could help me. I have a multi-dimensional array and I would like to pass it to a subroutine as follows : my @multi_array = ([1,2,3,4], [5,6,7,8]); my @result = process_array(@multi_array); print "The result is : @result\n"; sub process_array { my @array_pro

THIS IS A TEST - PLEASE DELETE THIS EMAIL - THANKS

2002-06-12 Thread Ho, Tony

Launching Perl Code in Parallel

2002-05-30 Thread Ho, Tony
Hi Guys I was wondering if you could help me. I have a perl program, get_ice_cream_descriptions.pl, that accepts 2 arguments For example, get_ice_cream_descriptions.pl 1 10 However, I would like to get ice cream descriptions for other ranges at the same time, such as 11 - 20, 21 - 30, 3

RE: Testing for command success

2002-05-07 Thread Ho, Tony
Can you try this ? system ("tar cvf ../test.tar *.grib"); if ($? == 0) { print "\nSuccess!\n"; } else { print "\nUnsuccessful!\n"; } The return code is in the perl $? variable. See perldoc perlvar for details. -Original Message- From: siren jones [mailto:[EMAIL PROTECTED]]

Error message

2002-05-06 Thread Ho, Tony
Hi guys, Has anybody seen the following message before ? Can't locate object method "connect" via package "DBI" (perhaps you forgot to load "DBI"?) at ./test.pl line 150 I would be most grateful with any advice Thanks in advance Tony -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additio

Assigning values from files into an aray

2002-04-23 Thread Ho, Tony
Hi guys I was wondering if you could help me. I have the following row of data in one file: 405^100^200^A^B C D E I have the following fragment of code that reads the data row: while () { $number_of_elements= 0; chop; ($record, $customer, $location,

RE: Writing formatted results to a file - PLEASE IGNORE PREVIOUS EMAIL

2002-04-18 Thread Ho, Tony
s again for the help. Tony -Original Message- From: Ho, Tony Sent: 18 April 2002 20:12 To: 'bob ackerman'; [EMAIL PROTECTED] Subject: RE: Writing formatted results to a file Hi Bob, I am having trouble writing another new format into the same file as the one I mentioned in the

RE: Writing formatted results to a file

2002-04-18 Thread Ho, Tony
: @<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< $record[$element], $line_output .. format SUMMARY1 = @<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

RE: Writing formatted results to a file

2002-04-16 Thread Ho, Tony
formatted results to a file On Tuesday, April 16, 2002, at 10:11 AM, Ho, Tony wrote: > Hi guys > I was wondering if you could help me. > Does anybody know how to write formatted results to a file ? > > I am getting the following error : > > write() on closed filehandle main::ADDR

Writing formatted results to a file

2002-04-16 Thread Ho, Tony
Hi guys I was wondering if you could help me. Does anybody know how to write formatted results to a file ? I am getting the following error : write() on closed filehandle main::ADDRESSLABEL at ./test.pl line 2785, line 5. write() on closed filehandle main::ADDRESSLABEL at ./test.pl line 2785,

Decimal numbers

2002-04-15 Thread Ho, Tony
Hi guys I was wondering if you could help me. If I read a value of 123.456 and I would like to print this value out as 123456 (without decimals), how can I go about it without doing any multiplication ? I would be most grateful for any advice. Thanks in advance Tony

Concatenation

2002-04-08 Thread Ho, Tony
Hi guys I was wondering if you could help me. In my perl code, I am reading a file with the following line: 123000 There are 3 spaces before 123000. I unpack the values into 2 variables, A and B A is assigned the 3 spaces and B is assigned the value 123000. I have another variable C which i

Perl dates

2002-04-03 Thread Ho, Tony
Hi guys, I was wondering if you could help me. I have a variable in my perl code called $deadline_date. I assign $deadline_date the value 20011212. The date format is MMDD. I have a file which contains 2 columns of values i.e. date and product as follows: 20011001 abc 20010701 bcd 20011101

RE: Assigning chunks into variables - Please ignore previous email

2002-03-21 Thread Ho, Tony
Hi guys I managed to use the "split" and "join" functions to achieve what I wanted. Many thanks for those who started thinking about a possible approach. Tony -Original Message- From: Ho, Tony Sent: 21 March 2002 20:37 To: '[EMAIL PROTECTED]' Subject: A

Assigning chunks into variables

2002-03-21 Thread Ho, Tony
Hi guys I was wondering if you could help me. I have the following string: 2010:abc:def:ghi If I go through this string and find the first colon (:), I want to assign everything before that colon into variable1 I would like to assign the rest of the string after the first colon into variable

RE: "Use of uninitialized value" error message

2002-03-13 Thread Ho, Tony
_value1, 8, 2); $c= substr($result_value1, 10, 2); return ($a, $b, $c); } else { return (" ", " ", " "); } Cheers Tony -Original Message- From: Nikola Janceski [mailto:[EMAIL PROTECTED]] Sent: 13 March 2002 17:16 To: 'Jason Larso

"Use of uninitialized value" error message

2002-03-13 Thread Ho, Tony
Hi guys I was wondering if you could help me with the following problem. I am getting the following error message: Use of uninitialized value in string ne at format_imsi_msisdn.pl line 257. line 257 and beyond consist of the following: if ($result_value1 ne " ") { $a= substr($resu

DBM and bcp files

2002-03-05 Thread Ho, Tony
Hi guys I was wondering if you could help me. I am bulk copying data from a Database using bcp into a data file. Can I transform my data file into a DBM file in perl ? If so, how do I go about it ? I would be most grateful if you could let me know. Cheers Tony

appending to rows

2002-03-01 Thread Ho, Tony
Hi guys I was wondering if you could help me I have 2 files. One file has 3 data rows, A, B and C The file has 1 data row D. I need to append row D to rows A and C in the first file, based on some condition. Any ideas how I could go about this ? Another alternative would be for me to open up

Unix commands in Perl scripts

2002-02-20 Thread Ho, Tony
Hi guys I was wondering if anyone knows how to execute Unix commands in a Perl Script ? I would be most grateful if you could let me know Thanks in advance Tony

Table Access OR File Manipulation

2002-02-19 Thread Ho, Tony
Hi guys I was wondering if you could help me. I am currently designing Perl DBI code to extract data from tables from Sybase Database under UNIX. There are a dozen of tables I need to extract information from. The biggest tables are ACCOUNTS and SUBSCRIBERS. ACCOUNT has 10 million rows and