perl and file and cat


 
Thread Tools Search this Thread
Top Forums Shell Programming and Scripting perl and file and cat
# 1  
Old 08-04-2011
perl and file and cat

Hi All


i need a little script that can open a file , read it and then spit out some information from it


from the shell i would do

Code:
cat /var/log/Xorg.0.log | grep  pixel | sed 's/: 330.*//' |

how can i do this nicley in perl

thanks

Adam
# 2  
Old 08-04-2011
Code:
 
perl -lane 'print if $_ =~ m/pixel/ && $_ =~ s/: 330.*//;' /var/log/Xorg.0.log

# 3  
Old 08-04-2011
More "perlish":
Code:
perl -lne '/pixel/ && s/: 330.*// && print'

# 4  
Old 08-04-2011
sorry got my sed round the wrong way, it should be

Code:
cat /var/log/Xorg.0.log | grep  pixel | sed 's/.*NVIDIA(0): //'

Login or Register to Ask a Question

Previous Thread | Next Thread

9 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Ssh cat file output into a file on local computer

Hello, I'm on a remote computer by SSH. How can I get the output of "cat file" into a file on the local computer? I cannot use scp, because it's blocked. something like: ssh root@remote_maschine "cat /file" > /locale_machine/file :rolleyes: (2 Replies)
Discussion started by: borsti007
2 Replies

2. UNIX for Advanced & Expert Users

for i in `cat file` do

in bash: for i in `cat file` ; do echo $i done; how will i do this in perl ? (10 Replies)
Discussion started by: linuxgeek
10 Replies

3. Shell Programming and Scripting

Cat file

how to cat a file by ignoring first line and last line (1 Reply)
Discussion started by: thelakbe
1 Replies

4. Shell Programming and Scripting

problem using CAT command in PERL

Hi All, I was trying to run the cat command using perl SCRIPT for my daily reports. However cat command is not working in PERL. please help me. cat FILE1.txt |cut -d "|" -f1 >INPUT1.txt cat FILE2.txt|wc -l *9111*|>INPUT2.txt paste INPUT1,INPUT2 >OUTPUT.txt Thanks in advance ... (3 Replies)
Discussion started by: adaleru
3 Replies

5. Shell Programming and Scripting

Formatting problem with cat, egrep and perl

Hi guys I'm using the following script to change input file format to another format. some where I'm getting the error. Could you please let me know if you find out? cat input.txt|egrep -v ‘^#'|\ perl -ane ‘if (@F>3){$_=~/(chr.+):(\d+)\ s()/;print $1,”\t”,$2,”\t”,($2+35),”\n”}'\ > output.bed ... (1 Reply)
Discussion started by: repinementer
1 Replies

6. Shell Programming and Scripting

cat in the command line doesn't match cat in the script

Hello, So I sorted my file as I was supposed to: sort -n -r -k 2 -k 1 file1 | uniq > file2 and when I wrote > cat file2 in the command line, I got what I was expecting, but in the script itself ... sort -n -r -k 2 -k 1 averages | uniq > temp cat file2 It wrote a whole... (21 Replies)
Discussion started by: shira
21 Replies

7. UNIX for Dummies Questions & Answers

Difference between cat , cat > , cat >> and touch !!!

Hi Can anybody tell the difference between Difference between cat , cat > , cat >> and touch command in UNIX? Thanks (6 Replies)
Discussion started by: skyineyes
6 Replies

8. UNIX for Advanced & Expert Users

Problem with cat with PERL Substitute

system("cat FILENAME | perl -e 'while(<>) { print $_;}'"); system("cat FILENAME | perl -e 'while(<>) { $_ =~ s/XXX/YYY/g; print $_;}'"); First command works fine but second command gives the following error: syntax error at -e line 1, near "{ =~" syntax error at -e line 1, near ";}"... (2 Replies)
Discussion started by: jingi1234
2 Replies

9. UNIX for Dummies Questions & Answers

Easiest way to cat out first 100 lines of a file into a different file?

Not sure how to do this exactly.. just want to take the first 100 lines of a file and cat it out into a second file. I know I can do a more on a file and > it into a different file, but how can I make it so only the first 100 lines get moved over? (1 Reply)
Discussion started by: LordJezo
1 Replies
Login or Register to Ask a Question