I want to swap hyphen (-) and underscore (_) in a string. In fact only one will be present. So if it is hyphen I want to make it underscore and if it is underscore I want to make it hyphen.
I can write a long code like below. Is there any easy way?
Hello everyone,
I'm writing a script to add a string to an XML file, right after a specified string that only occurs once in the file. For testing purposes I created a file 'testfile' that looks like this:
1
2
3
4
5
6
6
7
8
9
And this is the script as far as I've managed:
... (2 Replies)
Hi,
I have a requirement like this.
String=abcdefghijkl
I need to split this string into a substrign each 3 characters and write output into a file.
Output:
abc
def
ghi
jkl
Can any one please help me how can i acheive this
Thanks (3 Replies)
Hi there, I have some user input in a variable called $VAR, and i need to ensure that the string is 5 or less characters .... does anybody know how i can count the characters in the variables ?
any help would be great, cheers (2 Replies)
Hi Everyone,
I have a.txt
12341" <sip:191@vo.my>;asdf=q"
116aaaa<sip:00091@vo.my>;penguin
would like to get the output
191
00091
Please advice.
Thanks (4 Replies)
Hi
I have an integrity machine rx7620 and rx8640 running hp-ux 11.31. I'm planning to fine tune the system:
- I would like to know when does the memory swap space spill over to the device swap space?
- And how much % of memory swap utilization should be specified (swap space device... (6 Replies)
Hello Folks..
I need your help ..
here the example of my problem..i know its easy..i don't all the commands in unix to do this especiallly sed...here my string..
dwc2_dfg_ajja_dfhhj_vw_dec2_dfgh_dwq
desired output is..
dwc2_dfg_ajja_dfhhj
it's a simple task with tail... (5 Replies)
I need some help.
when i use the following command, it deletes all lines containing WINNT& v2010 and WINNT& v2010.2
I just want it to delete lines containing WINNT & v2010 only.
perl -n -i.bak -e 'print unless /WINNT/&&/v2010/' *.*
Danish (2 Replies)
Hello All
I have a file like this
abc.tpt.ctl
bdc.tpt.ctl
cdw.tpt.ctl
I have looped every line using the for Loop, now I want to take each line and cut the .tpt.ctl part of it and store it in a variable and use the variable in same loop.
The part I am stuck at is how do I cut the last... (9 Replies)
I have this fastq file:
@M04961:22:000000000-B5VGJ:1:1101:9280:7106 1:N:0:86
GGGGGGGGGGGGCATGAAAACATACAAACCGTCTTTCCAGAAATTGTTCCAAGTATCGGCAACAGCTTTATCAATACCATGAAAAATATCAACCACACCA
+test-1
GGGGGGGGGGGGGGGGGCCGGGGGFF,EDFFGEDFG,@DGGCGGEGGG7DCGGGF68CGFFFGGGG@CGDGFFDFEFEFF:30CGAFFDFEFF8CAF;;8... (10 Replies)
Discussion started by: Xterra
10 Replies
LEARN ABOUT DEBIAN
netsds::util::convert
NetSDS::Util::Convert(3pm) User Contributed Perl Documentation NetSDS::Util::Convert(3pm)NAME
NetSDS::Util::Convert - data formats conversion functions
SYNOPSIS
use NetSDS::Util::Convert qw(...);
DESCRIPTION
"NetSDS::Util::Convert" module contains miscelaneous functions.
o CLI parameters processing
o types validation
o HEX, Base64, URI, BCD encondig
o UUID processing
EXPORTED FUNCTIONS
conv_conv_str_bcd($str) - convert string to little-endian BCD
This function converts string to little-endian BCD encoding filled with F16 value.
conv_chr_hex($char) - encode char to hexadecimal string
$hex = conv_chr_hex('a'); # return 61
conv_hex_chr($hex) - convert hexadecimal string to character
$chr = conv_hex_chr('4A'); # return 'J'
conv_str_hex($str) - convert byte string to hexadecimal
$str = 'Want hex dump!';
$hex = conv_hex_str($str);
print "Hex string: " . $hex;
conv_hex_str($string) - convert hex to byte string
$hex = '7A686F7061';
$string = conv_hex_str($hex);
print "String from hex: " . $string;
conv_str_base64($str) - convert string to Base64
my $b64 = str_base64("Hallo, people!");
conv_base64_str($b64) - convert Base64 to string
my $str = base64_str($base64_string);
conv_str_uri($str) - convert string to URI encoded
Example:
my $uri = str_uri("http://www.google.com/?q=what");
conv_uri_str($uri) - decode URI encoded string
Example:
my $str = uri_str($uri_string);
EXAMPLES
None
BUGS
None
TODO
1. Add other encodings support
SEE ALSO
Pod::Usage, Data::UUID
AUTHORS
Valentyn Solomko <pere@pere.org.ua>
Michael Bochkaryov <misha@rattler.kiev.ua>
perl v5.12.4 2011-08-27 NetSDS::Util::Convert(3pm)