I need to replace the spaces in a line with tab space char(\t). But with a condition.The text in "double quotes" must be treated as a string and inside that the replacement of space with tab space must be avoided. There are more than 50000+ different lines in the file.
This can be done with awk or perl command I think.
Hi ,
Can anybody explain how this perl one liner works..
It is to test whether the number is prime or not
perl -le 'print "PRIME" if (1 x shift) !~ /^(11+)\1+$/' 19
Thanks in advance
Shihab (2 Replies)
Thanks for giving your time and effort to answer questions and helping newbies like me understand awk.
I have a huge file, millions of lines, so perl takes quite a bit of time, I'd like to convert these perl one liners to awk.
Basically I'd like all lines with ISA sandwiched between... (9 Replies)
Hi, I'm writing a ksh script and trying to use an awk / sed / or perl one-liner to remove the last 4 characters of a line in a file if it begins with a period.
Here is the contents of the file... the column in which I want to remove the last 4 characters is the last column. ($6 in awk). I've... (10 Replies)
can someone help me translate the following command, from:
/usr/bin/awk "/^$TOFDAYM $TOFDAYD /,0" $LOGFILE
to something like
perl -e .....
basically, i want to use perl to do awk functions within a shell script. i want to do the above awk, using perl.
any suggestions? (9 Replies)
hello,
I want to replace awk with a perl one liner in unix.
i use in awk REGEX and FS ( field separator) because
awk syntaxes in different unix os versions have not the same behaviour.
Awk, Nawk and GNU Awk Cheat Sheet - good coders code, great reuse
i have a file named "file" and want... (5 Replies)
Not quite a unix question but problem in a perl command. Taking a chance if someone knows about the error
cat 1
a b c d
perl -p -e 's/a/b/g' 1
b b c d
What is the problem here??
perl -p -i -e 's/a/b/g' 1
Can't remove 1: Text file busy, skipping file. (2 Replies)
Hello experts,
I'm stuck with this script for three days now. Here's what i need.
I need to split a large delimited (,) file into 2 files based on the value present in the last field.
Samp: Something.csv
bca,adc,asdf,123,12C
bca,adc,asdf,123,13C
def,adc,asdf,123,12A
I need this split... (6 Replies)
Hi all,
I need a Perl one liner which prints a newline into a .txt file, only where the line starts with "/mediawiki-1.19.0/". It should add the newline to the line before.
My problem is, when I try to realize this (with my little knowledge :rolleyes: ) i come to the point where the // are... (4 Replies)
hi,
I am using PERL one liner for oracle database connection as :
$PERL -e "use DBI; DBI->connect(qw(DBI:Oracle:SID user passwd));"
is there a way to append select statement to this connection ? i.e. DB connection and select stmt in one line ?
how to do sysdba connection using one lines... (1 Reply)
Greetings fellow scripters.
I find myself editing multiple files, sometimes with the same bits of information. My bash script, a changelog, and a plist file (OS X). Once I realized this, I thought why not script part of this process (and so it begins). In any case, I've solved several of the... (1 Reply)
Discussion started by: reid
1 Replies
LEARN ABOUT DEBIAN
net::google::code
Net::Google::Code(3pm) User Contributed Perl Documentation Net::Google::Code(3pm)NAME
Net::Google::Code - a simple client library for google code
SYNOPSIS
use Net::Google::Code;
my $project = Net::Google::Code->new( project => 'net-google-code' );
$project->load; # load its metadata, e.g. summary, owners, members, etc.
print join(', ', @{ $project->owners } );
# return a Net::Google::Code::Issue object, of which the id is 30
$project->issue( id => 30 );
# return a Net::Google::Code::Download object, of which the file name is
# 'FooBar-0.01.tar.gz'
$project->download( name => 'FooBar-0.01.tar.gz' );
# return a Net::Google::Code::Wiki object, of which the page name is 'Test'
$project->wiki( name => 'Test' );
# loads all the downloads
$project->load_downloads;
my $downloads = $project->downloads;
# loads all the wikis
$project->load_wikis;
my $wikis = $project->wikis;
DESCRIPTION
Net::Google::Code is a simple client library for projects hosted in Google Code.
Since 0.15, Net::Google::Code offers google's official issues api support. Besides the new "Net::Google::Code::Issue::list",
"Net::Google::Code::Issue::Comment::list" and <Net::Googlel::Code::Issue::load_comments> methods, which use the api from start, you can set
$Net::Google::Code::Issue::USE_HYBRID to true to load, create and update issue with the api too.
But the official api is not function complete yet( e.g. no attachment support, can't merge, etc. ), Net::Google::Code will back to the
scraping way to accomplish those stuff.
ATTRIBUTES
project
the project name
email, password
user's email and password, used to authenticate
base_url
the project homepage
base_svn_url
the project svn url (without trunk)
base_feeds_url
the project feeds url
summary
description
labels
owners
members
INTERFACE
load
load project's home page, and parse its metadata
parse
acturally do the parse job, for load();
load_downloads
load all the downloads, and store them as an arrayref in $self->downloads
load_wikis
load all the wikis, and store them as an arrayref in $self->wikis
issue
return a new Net::Google::Code::Issue object, arguments will be passed to Net::Google::Code::Issue's new method.
download
return a new Net::Google::Code::Download object, arguments will be passed to Net::Google::Code::Download's new method.
wiki
return a new Net::Google::Code::Wiki object, arguments will be passed to Net::Google::Code::Wiki's new method.
DEPENDENCIES
Any::Moose, HTML::TreeBuilder, WWW::Mechanize, Params::Validate XML::FeedPP, DateTime, JSON, URI::Escape, MIME::Types, File::MMagic
INCOMPATIBILITIES
None reported.
BUGS AND LIMITATIONS
No bugs have been reported.
This project is very very young, and api is not stable yet, so don't use this in production, at least for now.
AUTHOR
sunnavy "<sunnavy@bestpractical.com>"
Fayland Lam "<fayland@gmail.com>"
LICENCE AND COPYRIGHT
Copyright 2008-2010 Best Practical Solutions.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
perl v5.10.1 2010-04-26 Net::Google::Code(3pm)