Search Results

$ perl -lne 'if(/create/ .. /Elapsed/) { if(/create\s+index\s+(.*)\s+on/) { $i = $1 } elsif(/^Elapsed:\s+(.*)$/) { $e = $1; print join("\t", $i, $e); } }' input
XYZ_F75 00:08:08.58
XYZ_F81...

Assuming you have this input and you want the following output


$ cat xyz
primary
Factory CTS 1.9.0(46) P1
*Slot 1 CTS 1.10.2(42) P1
primary
Factory CTS 2.0.0(18) P1
*Slot 1 CTS 2.1.0(42)...

bash-3.2$ cat input.txt
^[[7m PID USER PR NI VIRT RES SHR S %CPU %MEM TIME+ COMMAND ^[[m^O^[[K...

The following does what you want
du -ab . | sort -nr | grep -i '.tar.gz$'

Like that?


bash-3.2$ awk 'BEGIN{x=1} /DEFINE SCHEMA/,/\)\;/ {if (NF==2) { $1="t"x" as filler"; print; x++ }}' filename
t1 as filler VARCHAR(10)

echo abc.tpt.ctl | rev | cut -c 9- | rev
abc

bash-3.2$ cat x
abc.tpt.ctl
bdc.tpt.ctl
cdw.tpt.ctl
bash-3.2$ cat x | rev | cut -c 9- | rev
abc
bdc
cdw

Try this


filecount=$(find . -type f -name "*.csv" | wc -l)

Make sure you have installed the Date::Calc Module


perl -MDate::Calc -e 'use Date::Calc qw(Delta_DHMS); ($Dd,$Dh,$Dm,$Ds) = Delta_DHMS($year1,$month1,$day1, $hour1,$min1,$sec1,...

Try: java ./java_programs/test_program/test

without the .java extension like you had

bash-3.2$ cat txt
source,cu_001,cu_001_volume,cu_001_mass,cu_002,cu_002_volume,cu_002_mass,cu_003,cu_003_volume,cu_003_mass
ja116,1.33,3024000,9374400,1.54,3026200,9375123,1.98,3028000,9385512
...

you have to power off the vm to run the backup by mounting their file systems or dd them out unless you have backup agents running in your vm

Hopefully someone could explain it better than me :D



my $c=0; # set counter to 0
my %r=(); # initialize hash %r

while(<>) {
# if line matches: 'MOBILITY EVENT...

awk -F: '$3 ~ /^20/ {print $0}' input_file

yeah, "last" is just breaking the loop. In bash, use break


#!/bin/bash

while read line
do
if [[ "${line}" =~ "^CREATE TABLE" ]]
then
# add code to begin...

Okay, I've coded a perl version similar to your java version after looking at your code more precisely. I am leaving that file operation aside first.


#!/usr/bin/perl

while(<>) {
...

perl -lne '/^\s*CREATE\s+TABLE/i && open FILE, ">tmpfile.sql"; (/^\s*CREATE\s+TABLE/i .. /^\s*\)\s+ENGINE=InnoDB/i) && print FILE; /^\s*\)\s+ENGINE\InnoDB/i && close FILE;' mysqldump.sql


That...