Search Results

echo {a..e}{a..e}{a..e} | xargs -n1

sed -e 's/JAN_DAT_(.*\)\_([0-9]\{10\}\).*.csv/\1 \2/g'

The first thing is: sed-patterns are always "greedy", which means they match the longest possible part of the line. A pattern like A.*B will...

It does so for a reason because it is not advisable to use the "-i" switch at all, even in the few versions of sed not adhering to the standards which have it, because the the standards also do NOT...

Hi durden_tyler,
The macOS pbpaste command writes whatever was last copied into the paste buffer. If the selected text included a trailing <newline>, a trailing <newline> will be included in the...

One other option:
sed -n "/ [+-]*[0-9]*\.[0-9][0-9]* / p" hello.outIt writes nine lines given Durden's last example of hello.out.

Andy200 - please do not edit your posts after someone answers. You can no longer post to this thread.

Thanks you for understanding that what you were doing is extremely unhelpful to the folks...

aia - correct and simpler. Not necessarily good for someone obviously new to perl to get what is going on.

I often post 'long' versions of something so that each step is clear. Your example is...

That will work with some versions of awk and give you a syntax error with other versions of awk. The following should work with almost any version of awk:
awk '{$1=$1; print>("file"NF)}'...

Or:
sed '/_ABC$/s/^DSCAPP123#/PRDAPP123#/; /_RW$/s/^DSCAPP123#/PDDAPP123#/'

Or
sed '/_ABC$/ s/^DSC/PRD/; /_RW$/ s/^DSC/PDD/' file
PRDAPP123#XYZ_A0015_ABC
PDDAPP123#XYZ_BC00034_RW

--


This also sorts the header, putting it on an undefined line number. So the shell logic for skipping the header, which assumes it to be on the first line, will not function as intended (it...

Try :
awk 'p==s{gsub(qr,x); gsub(fs,ORS,$1); print $1}{p=$NF}' s=BUNLOES fs=mgg qr="'|\"" RS== file


--
@SkySmart: you just changed the specification in post #15, by introducing random single...

Generally: commands in one-liner style do not enhance the readability all too much. If you don't understand it it is a good idea to first write it out, like i have done:


sed -n '/{/ ! b ...

Or, in short, show the data you have, and then, show the data you want, and explain how they're related.

Precisely because of that.



In fact, you can do whatever you want, but the error won't go away otherwise.



As you have been told: because the man page says so. But there is a deeper...

OK, that was weird.

wrap *wrap=malloc(sizeof(wrap));

This, folks, is why you don't ever name your variable the same name as a type.

size of structure: 4K and a bit.
size of...

Hi, durden_tyler

Nice work, however your output is a bit off of what it is wanted if I am interpreting correctly.


Your output: S 40149.00 47897.00 1V1 0.0 0 0.0 453310.8...

Other than the fact that you have eliminated spaces in your |T and .T "records" and now have variable length records in the lines between the ?T "records", this is extremely similar to your last...

Hi.

Something similar using a CPAN module, adapted from the examples:
#!/usr/bin/env perl

# @(#) p3 Demonstrate module Math/Combinatorics.

use Math::Combinatorics;

my ( $min, $max ) = (...

A semi-colon is missing:

$ sed '/^.AR/{s/AR/yyy/; s/.$//;}' f01

The deep dark secret of high-level languages is that, even if you treat C/C++ as a dark-ages language and eschew it for java/python/shell/CAML/INTERCAL, nearly all the "Good Stuff" your programs...

I agree with Corona688.

Don't use remote sites like pastebin to attach code here.

Code should be uploaded to this site and not foreign sites.

After this post, I'm proposing a new rule to...

Linux, to be pedantic, is just a kernel. You can find the source for that @ The Linux Kernel Archives (http://www.kernel.org/). However, that does not include all of the bits that make a linux...

perl -0777 -F'/\n\n+/' -ane '
print join "\n\n",
map { $_->[1] }
sort { $a->[0] cmp $b->[0] }
map { [(split /\n/)[0], $_] } @F; ...

perl -le'
@str = qw(
ab% %%abc %ab%c% %a%b%c% ab%c ab%%%%%c ab%%c
);

do {
$cnt = tr/%//; push @{$cnt{$cnt}}, $_;
$min = $cnt unless defined $min and $cnt > $min;
...