sudo qm list | grep -P '^[ ]*100' | awk '{print $3}'
sudo qm list | grep -P '100[^.]' | awk '{print $3}'
grep -r -l "something" | xargs stat --format="Name: %n Size: %B"
while read; do
MYPATH="${REPLY%/*}"
MYNAME="${REPLY##*/}"
SIZE="$(stat --format='%s' ${REPLY})"
[[ "${MYPATH}" == "${MYNAME}" ]] && MYPATH=""
echo "Path: ${MYPATH}/ Name: ${NAME} Size: ${SIZE}"
done<<<$(grep -r -l "alias")
sed -r "2,3s/(.*)/\/\/\1/g" test.txt
#/usr/bin/perl
open(FILE1,"a.txt");
open(FILE2,"b.txt");
foreach $line (<FILE1>) {
chomp $line;
($a, $b, $c, $d, $e, $f, $g)=split(",",$line);
$array{$a}{$c}=$f;
}
foreach $line (<FILE2>) {
chomp $line;
($a, $b, $c, $d, $e, $f, $g)=split(",",$line);
if ($array{$a}{$c}!=$f) {
print "$line, [differs from: $array{$a}{$c}]\n";
}
}