Sponsored Content
Top Forums Shell Programming and Scripting Find string1, when true find string2 in reverse direction Post 303022552 by Aia on Sunday 2nd of September 2018 04:14:49 PM
Old 09-02-2018
Alternatively:

Code:
 perl -ne '/testtt/ and print "$_$keep"; $keep=$_ if /@/' test.file
     5  testtt 11223344
     1  His email address alfredo@alfredo.ru
    14  testtt 55667788
     8  His email address daniel@alfredo.ru

or
Code:
perl -ne '/testtt/ and print "$keep$_"; $keep=$_ if /@/' test.file
     1  His email address alfredo@alfredo.ru
     5  testtt 11223344
     8  His email address daniel@alfredo.ru
    14  testtt 55667788

Code:
cat test.file
     1  His email address alfredo@alfredo.ru
     2  test1
     3  test2
     4  test3
     5  testtt 11223344
     6  test4
     7  test5
     8  His email address daniel@alfredo.ru
     9  kkkk
    10  ddd
    11  ggg
    12  www
    13  qqq
    14  testtt 55667788
    15  His email address lucas@alfredo.ru
    16  aaa
    17  bbb
    18  ccc
    19  ddedd
    20  eeeeeeee
    21  ffffff

This User Gave Thanks to Aia For This Post:
 

9 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

command find returned bash: /usr/bin/find: Argument list too long

Hello, I create a file touch 1201093003 fichcomp and inside a repertory (which hava a lot of files) I want to list all files created before this file : find *.* \! -maxdepth 1 - newer fichcomp but this command returned bash: /usr/bin/find: Argument list too long but i make a filter all... (1 Reply)
Discussion started by: yacsil
1 Replies

2. UNIX for Dummies Questions & Answers

Replacing string1 with string2 in many files

I have 70 files and want to replace string1 with string2. How can i do that?. Thanks (4 Replies)
Discussion started by: shashikandi
4 Replies

3. Shell Programming and Scripting

ps -ef | grep "string1" "string2" " "string3"

Hi all, can any one suggest me the script to grep multiple strings from ps -ef pls correct the below script . its not working/ i want to print OK if all the below process are running in my solaris system. else i want to print NOT OK. bash-3.00$ ps -ef | grep blu lscpusr 48 42 ... (11 Replies)
Discussion started by: steve2216
11 Replies

4. Shell Programming and Scripting

Remove lines before string1 and after string2

Hello All... I have a text file (.ics) which I need to read into a variable but ONLY the part including and after 'BEGIN:VEVENT' and ending with END:VEVENT Anything before BEGIN:VEVENT or after END:VEVENT should be ignored. Thanks for input Jeff BEGIN:VCALENDAR VERSION:2.0... (3 Replies)
Discussion started by: uptimejeff
3 Replies

5. Shell Programming and Scripting

awk - print record with both string1 and string2

How do I use awk to find the records in a file that contains two specific strings? I have tried piping and using awk two times, but I don't know how to do it in one action. (2 Replies)
Discussion started by: locoroco
2 Replies

6. Shell Programming and Scripting

How to find a file with a specific pattern for current sysdate & upon find email the details?

I need assistance with following requirement, I am new to Unix. I want to do the following task but stuck with file creation date(sysdate) Following is the requirement I need to create a script that will read the abc/xyz/klm folder and look for *.err files for that day’s date and then send an... (4 Replies)
Discussion started by: PreetArul
4 Replies

7. UNIX for Beginners Questions & Answers

Replace string2 with string3 on all lines starting with string1

My OS is Windows 10 and I am using Cygwin. The file 1 content is: USE solution 2; -4.000 USE solution 3; -4.000 … USE solution 29; -4.000 USE solution 30; -4.000 USE solution 31; -4.000 …. USE solution 89; -4.000 ... USE solution 202; -4.000 etc... I need to replace... (8 Replies)
Discussion started by: supernono06
8 Replies

8. Shell Programming and Scripting

Replace string2 by string3 where string1 is found in line

Hello, My aim is to search string1 in all lines. When found, find and replace string2 by string3 if possible. TextFile: Here is my first line Second line with string1 & string2 Not last line but it contains string1 Expected output: Here is my first line The second line with string1 &... (6 Replies)
Discussion started by: baris35
6 Replies

9. UNIX for Beginners Questions & Answers

Replace string2 by string3 where string1 is found in line

I found this in the forum that searches a file for string1, substitute all occurrences of string2 with string3. (Title: Replace string2 by string3 where string1 is found in line) >> sed -i '/string1/s/string2/string3/g' TextFile How will I perform the same sed command and only substitute... (3 Replies)
Discussion started by: apalex
3 Replies
Mail::Verify(3pm)					User Contributed Perl Documentation					 Mail::Verify(3pm)

NAME
Mail::Verify - Utility to verify an email address SYNOPSIS
use Mail::Verify; DESCRIPTION
"Mail::Verify" provides a function CheckAddress function for verifying email addresses. First the syntax of the email address is checked, then it verifies that there is at least one valid MX server accepting email for the domain. Using Net::DNS and IO::Socket a list of MX records (or, falling back on a hosts A record) are checked to make sure at least one SMTP server is accepting connections. ERRORS
Here are a list of return codes and what they mean: 0 The email address appears to be valid. 1 No email address was supplied. 2 There is a syntaxical error in the email address. 3 There are no DNS entries for the host in question (no MX records or A records). 4 There are no live SMTP servers accepting connections for this email address. EXAMPLES
This example shows obtaining an email address from a form field and verifying it. use CGI qw/:standard/; use Mail::Verify; my $q = new CGI; [...] my $email = $q->param("emailaddr"); my $email_ck = Mail::Verify::CheckAddress( $email ); if( $email_ck ) { print '<h1>Form input error: Invalid email address.</h1>'; } [...] perl v5.8.8 2002-06-09 Mail::Verify(3pm)
All times are GMT -4. The time now is 11:43 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy