Sponsored Content
Top Forums Shell Programming and Scripting combine two perl lines into a single perl command Post 302325356 by KevinADC on Sunday 14th of June 2009 11:56:45 PM
Old 06-15-2009
Quote:
Originally Posted by summer_cherry
Code:
my $str='00:44:40';
$str=~s/([0-9]{2}):([0-9]{2}):([0-9]{2})/$1*3600+$2*60+$3/e;
print $str;

Gee, thats original. Smilie
 

10 More Discussions You Might Find Interesting

1. UNIX for Dummies Questions & Answers

sed or grep or perl combine two lines

how do i search for the phrase "expected" on line one and "received" on line two. (there is a newline in between the two) I would like to know if/how this can be done in perl and/or grep and/or sed (3 Replies)
Discussion started by: artjaniger
3 Replies

2. Shell Programming and Scripting

combining perl regex'es into a single command

Hi Gurus, I have a working solution for munging my data but just wondered if there was a way I could streamline it into a single command at all ? my $filesystem = "backup/server56/oracle/" $filesystem =~ s/\/+$// ; # remove the trailing slash(es) from the path specified... (4 Replies)
Discussion started by: hcclnoodles
4 Replies

3. Shell Programming and Scripting

perl combine if

Hi Evereyone, %q = (); $q{"a"} = 0; $q{"b"} = 0; $q{"c"} = 0; if ($q{"a"} !=0 || $q{"b"} !=0 || $q{"c"} !=0) { print "non-zero" } if any simple way to do that? assume you have not only a, b, c inside %q, but a, b, c, d, e, ... ... Thanks (2 Replies)
Discussion started by: jimmy_y
2 Replies

4. Shell Programming and Scripting

Command to remove duplicate lines with perl,sed,awk

Input: hello hello hello hello monkey donkey hello hello drink dance drink Output should be: hello hello monkey donkey drink dance (9 Replies)
Discussion started by: cola
9 Replies

5. Shell Programming and Scripting

Combine multiple lines in single line

This is related to one of my previous post but now with a slight difference: I need the "Updated:" to be in one line as well as the "Information:" on one line as well. These are in multiple lines right now as seen below. These can have 2 or more lines that needs to be in one line. System name:... (8 Replies)
Discussion started by: The One
8 Replies

6. Shell Programming and Scripting

Replace single quote with two single quotes in perl

Hi I want to replace single quote with two single quotes in a perl string. If the string is <It's Simpson's book> It should become <It''s Simpson''s book> (3 Replies)
Discussion started by: DushyantG
3 Replies

7. Programming

PERL:Combining multiple lines to single line

Hi All I need a small help for the below format in making a small script in Perl or Shell. I have a file in which a single line entries are broken into three line entries. Eg: I have a pen and notebook. All i want is to capture in a single line in a separate file. eg: I have a pen and... (4 Replies)
Discussion started by: Kalaiela
4 Replies

8. Shell Programming and Scripting

Combine multiple unique lines from event log text file into one line, use PERL or AWK?

I can't decide if I should use AWK or PERL after pouring over these forums for hours today I decided I'd post something and see if I couldn't get some advice. I've got a text file full of hundreds of events in this format: Record Number : 1 Records in Seq : ... (3 Replies)
Discussion started by: Mayday22
3 Replies

9. Shell Programming and Scripting

Combine multiple lines into single line

Hi All , I have a file with below data # User@Host: xyz @ # Query_time: t1 Lock_time: t2 Rows_sent: n1 Rows_examined: n2 SET timestamp=1396852200; select count(1) from table; # Time: 140406 23:30:01 # User@Host: abc @ # Query_time: t1 Lock_time: t2 Rows_sent: n1 Rows_examined:... (6 Replies)
Discussion started by: rakesh_411
6 Replies

10. Shell Programming and Scripting

How to add line breaks to perl command with large text in single quotes?

Below code extracts multiple field values from XML into array and prints all in one line. perl -nle '@r=/(?: jndiName| authDataAlias| value| minConnections| maxConnections| connectionTimeout| name)="(+)/g and print join ",",$ENV{tIPnSCOPE},$ENV{pr ovider},$ENV{impClassName},@r' server.xml ... (4 Replies)
Discussion started by: kchinnam
4 Replies
ICONV_SUBSTR(3) 							 1							   ICONV_SUBSTR(3)

iconv_substr - Cut out part of a string

SYNOPSIS
string iconv_substr (string $str, int $offset, [int $length = iconv_strlen($str, $charset)], [string $charset = ini_get("iconv.inter- nal_encoding")]) DESCRIPTION
Cuts a portion of $str specified by the $offset and $length parameters. PARAMETERS
o $str - The original string. o $offset - If $offset is non-negative, iconv_substr(3) cuts the portion out of $str beginning at $offset'th character, counting from zero. If $offset is negative, iconv_substr(3) cuts out the portion beginning at the position, $offset characters away from the end of $str. o $length - If $length is given and is positive, the return value will contain at most $length characters of the portion that begins at $offset (depending on the length of $string). If negative $length is passed, iconv_substr(3) cuts the portion out of $str from the $offset'th character up to the character that is $length characters away from the end of the string. In case $offset is also negative, the start position is calculated beforehand according to the rule explained above. o $charset - If $charset parameter is omitted, $string are assumed to be encoded in iconv.internal_encoding. Note that $offset and $length parameters are always deemed to represent offsets that are calculated on the basis of the character set determined by $charset, whilst the counterpart substr(3) always takes these for byte offsets. RETURN VALUES
Returns the portion of $str specified by the $offset and $length parameters. If $str is shorter than $offset characters long, FALSE will be returned. SEE ALSO
substr(3), mb_substr(3), mb_strcut(3). PHP Documentation Group ICONV_SUBSTR(3)
All times are GMT -4. The time now is 05:49 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy