06-07-2009
perl newbie question
I have the following question in perl, I have come up with couple of solutions,Perl gurus please help me find the best answer to my question?
You have a PERL database named DataEntryData, and you need to separate out the various values from the DB entry $item, delimited by the ^ sumbol. There are 5 values that need to be named, in this order: rectype, subrec, datasrc, keydate, and code1. How can you separate the values and name them correctly in one PERL command?
solution1:
IFS="^"
# $item=rectype^subrec^datasrc^keydate^doce1
# set -- $item
# arr=( $item )
# echo ${arr[0]} ${arr[1]} ${arr[2] ${arr[3] ${arr[4]}
solution2:
IFS=^
echo "$item" | read arr[1] arr[2] arr[3] arr[4] arr[5]
IFS=","
solution3:
(@params) = split('\^',$item);
Thanks for your time.
ram
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
Hello,
I have text file while looks this
test1
test2
test3
test4
test5
test6
and if I want to parse it and make new file which would like this
test1 test2
test3 test4
test5 test6
How can I do this in korn shell script
Thanks (9 Replies)
Discussion started by: peeyush_23
9 Replies
2. UNIX for Dummies Questions & Answers
sorry if im not asking inthe right spot but, how do you turn the beeping off every time you hit a key onthe keyboard. I tried the click -n but it told me it didnt recognize click
any help would be greatly appreciated ( the beeping is not going over well in the surrounding cubicles)
thank you... (4 Replies)
Discussion started by: Split100
4 Replies
3. Shell Programming and Scripting
Can someone tell me what this is doing? I know it is reading records from a table and puts them in a hash. How do I print out, let's say, the first 5 columns of data (assuming columns are named col1, col2, ...)?
$sth = $dbh->prepare("select *
from stsc.loc
... (2 Replies)
Discussion started by: ssmiths001
2 Replies
4. UNIX for Dummies Questions & Answers
Hello everyone,
Just started UNIX today! In our school we use solaris. I just want to know how do I setup Solaris 10 not the GUI one, the one where you have to type the commands like ECHO, ls, pwd, etc... I have windows xp and I also have vmware.
I hope I am not missing anything! :p (4 Replies)
Discussion started by: Hanamachi
4 Replies
5. Shell Programming and Scripting
Hello everyone,
I am having to do a lot of perl scripting these days and I am learning a lot.
I have this problem
I want to move files from a folder and all its sub folders to one parent folder, they are all .gz files..
there is folder1\folder2\*.gz
and there are about 50 folders... (1 Reply)
Discussion started by: xytiz
1 Replies
6. Shell Programming and Scripting
Hi,
I am new to programming and also to perl..But i know 'perl' can come to my rescue, But I am stuck at many places and need help..any small help is much appreciated... below is the description of what i intend to acheive with my script.
I have a files named in this format... (13 Replies)
Discussion started by: xytiz
13 Replies
7. Shell Programming and Scripting
Hi there
apologies for the really basic question but if i have a variable called $string that I want to run a regex against and output to another variable ...how do i do it, I know that if i wanted to alter the current $string variable i would do
$string=~ s/old/new/g;
but i kind of want... (2 Replies)
Discussion started by: rethink
2 Replies
8. UNIX for Dummies Questions & Answers
Hi all,
I am sure this is very simple but I cant quite get it.
I am trying to search textfile1.txt for a string then take the results of the search and append the result to textfile3.txt
So far I have used
$ find file1.txt -exec grep "string i am looking for" '{}' \; -print
this... (2 Replies)
Discussion started by: radgator
2 Replies
9. Shell Programming and Scripting
I am completely new to perl programming. My father is helping me learn said programming language. However, I am stuck on one of the assignments he has given me, and I can't find very much help with it via google, either because I have a tiny attention span, or because I can be very very dense.
... (4 Replies)
Discussion started by: kittyluva2
4 Replies
10. Shell Programming and Scripting
I was looking through some code online and came accross this...
ls *.txt | grep text1 | cat file1 – file2 | `echo wc –l`
I know what "ls|grep text1" does and I know a word count gets echoed but beyond that I am confused. Please use layman terms as much as possible as I am a newbie. (8 Replies)
Discussion started by: elohssa
8 Replies
LEARN ABOUT PHP
locale_parse
LOCALE_PARSE(3) 1 LOCALE_PARSE(3)
Locale::parseLocale - Returns a key-value array of locale ID subtag elements.
Object oriented style
SYNOPSIS
publicstatic array Locale::parseLocale (string $locale)
DESCRIPTION
Procedural style
array locale_parse (string $locale)
Returns a key-value array of locale ID subtag elements.
PARAMETERS
o $locale
- The locale to extract the subtag array from. Note: The 'variant' and 'private' subtags can take maximum 15 values whereas 'ext-
lang' can take maximum 3 values.
RETURN VALUES
Returns an array containing a list of key-value pairs, where the keys identify the particular locale ID subtags, and the values are the
associated subtag values. The array will be ordered as the locale id subtags e.g. in the locale id if variants are '-varX-varY-varZ' then
the returned array will have variant0=>varX , variant1=>varY , variant2=>varZ
EXAMPLES
Example #1
locale_parse(3) example
<?php
$arr = locale_parse('sl-Latn-IT-nedis');
if ($arr) {
foreach ($arr as $key => $value) {
echo "$key : $value , ";
}
}
?>
Example #2
OO example
<?php
$arr = Locale::parseLocale('sl-Latn-IT-nedis');
if ($arr) {
foreach ($arr as $key => $value) {
echo "$key : $value , ";
}
}
?>
The above example will output:
language : sl , script : Latn , region : IT , variant0 : NEDIS ,
SEE ALSO
locale_compose(3).
PHP Documentation Group LOCALE_PARSE(3)