সেড শিক্ষানবিস: একটি ফোল্ডারে সমস্ত উপস্থিতি পরিবর্তন করা

Question 1

একটি ফোল্ডারে (এবং এর সাবফোল্ডার) সমস্ত ফাইলের জন্য আমি একটি রেইজেক্স সন্ধান এবং প্রতিস্থাপন করতে হবে। এটি করার জন্য লিনাক্স শেল কমান্ডটি কী হবে?

উদাহরণস্বরূপ, আমি এটি সমস্ত ফাইলের মধ্যে চালাতে এবং পুরানো ফাইলটিকে নতুন, প্রতিস্থাপিত পাঠ্যের সাথে ওভাররাইট করতে চাই।

sed 's/old text/new text/g'

Question 2

এটি কেবলমাত্র সেড ব্যবহার করে করার কোনও উপায় নেই। আপনাকে কমপক্ষে অনুসন্ধানের ইউটিলিটি একসাথে ব্যবহার করতে হবে:

find . -type f -exec sed -i.bak "s/foo/bar/g" {} \;

এই কমান্ডটি .bakপ্রতিটি পরিবর্তিত ফাইলের জন্য একটি ফাইল তৈরি করবে ।

মন্তব্য:

-iজন্য যুক্তি sedকমান্ড, একটি গনুহ এক্সটেনশন, তাই আপনি এই কমান্ড চালান তাহলে বাসদ সাথে sedআপনি একটি নতুন ফাইল আউটপুট পুনর্নির্দেশ করতে হবে তারপর, এটা নামান্তর।
findউপযোগ বাস্তবায়ন না -execবয়সী ইউনিক্স বাক্সে যুক্তি, তাই, আপনি একটি ব্যবহার করতে হবে | xargsপরিবর্তে।

Question 3

আমি find | xargs cmdবেশি ব্যবহার করতে পছন্দ করি find -execকারণ এটি মনে রাখা সহজ।

এই উদাহরণটি বিশ্বব্যাপী আপনার বর্তমান ডিরেক্টরিতে বা নীচে .txt ফাইলগুলিতে "বার" সাথে "ফু" প্রতিস্থাপন করে:

find . -type f -name "*.txt" -print0 | xargs -0 sed -i "s/foo/bar/g"

-print0এবং -0অপশন বাদ করা যাবে যদি আপনার ফাইলের নামের এই ধরনের স্পেস হিসাবে ভীতু অক্ষর থাকে না।

Question 4

বহনযোগ্যতার জন্য, আমি লিনাক্স বা বিএসডি-র সাথে নির্দিষ্ট সেডের বৈশিষ্ট্যগুলিতে নির্ভর করি না। পরিবর্তে আমি overwriteস্ক্রিপ্টটি কার্নিগান এবং পাইকের বই ইউনিক্স প্রোগ্রামিং পরিবেশের উপর ব্যবহার করি।

কমান্ডটি তখন

find /the/folder -type f -exec overwrite '{}' sed 's/old/new/g' {} ';'

এবং overwriteস্ক্রিপ্ট (যা আমি পুরো জায়গা জুড়ে ব্যবহার করি)

#!/bin/sh
# overwrite:  copy standard input to output after EOF
# (final version)

# set -x

case $# in
0|1)        echo 'Usage: overwrite file cmd [args]' 1>&2; exit 2
esac

file=$1; shift
new=/tmp/$$.new; old=/tmp/$$.old
trap 'rm -f $new; exit 1' 1 2 15    # clean up files

if "$@" >$new               # collect input
then
    cp $file $old   # save original file
    trap 'trap "" 1 2 15; cp $old $file     # ignore signals
          rm -f $new $old; exit 1' 1 2 15   # during restore
    cp $new $file
else
    echo "overwrite: $1 failed, $file unchanged" 1>&2
    exit 1
fi
rm -f $new $old

ধারণাটি হ'ল এটি কোনও ফাইলকে ওভাররাইট করে কেবল যদি কোনও কমান্ড সফল হয়। দরকারে findএবং যেখানে আপনি ব্যবহার না করার চাইবেন

sed 's/old/new/g' file > file  # THIS CODE DOES NOT WORK

কারণ শেল ফাইলটি sedপড়ার আগে এটি কেটে দেয় ।

Question 5

আমি প্রস্তাব দিতে পারি (আপনার ফাইলগুলি ব্যাক আপ করার পরে):

find /the/folder -type f -exec sed -ibak 's/old/new/g' {} ';'

Question 6

উদাহরণ: / অ্যাপ্লিকেশন / কনফিগারেশন / ফোল্ডার এবং এর চাইল্ড ফোল্ডারের অধীনে থাকা সমস্ত আইএনআই ফাইলের জন্য 1 দিয়ে {অটোস্টার্ট rep প্রতিস্থাপন করুন:

sed 's/{AutoStart}/1/g' /app/config/**/*.ini

Question 7

for i in $(ls);do sed -i 's/old_text/new_text/g' $i;done

Question 8

এটি আমার পক্ষে কাজ করেছে (ম্যাক টার্মিনালে, লিনাক্সে আপনার প্রয়োজন নেই '' -e):

sed -i '' -e 's/old text/new text/g' `grep 'old text' -rl *`

কমান্ডটি grep 'old text' -rl *ওয়ার্কিং ডিরেক্টরি (এবং উপ-ডিরেক্টরি) যেখানে "পুরানো পাঠ্য" বিদ্যমান রয়েছে সেখানে সমস্ত ফাইল তালিকাভুক্ত করে। এটি তারপর সেড মধ্যে পাস করা হয়।

Question 9

আমার ভর অনুসন্ধান / পার্ল স্ক্রিপ্টটি প্রতিস্থাপন করতে পারে । শৃঙ্খলযুক্ত-ইউটিলিটি সমাধানগুলির কিছু সুবিধা রয়েছে (যেমন শেল মেটাচার্যাক্টারের ব্যাখ্যার একাধিক স্তরের সাথে ডিল না করা)।

#!/usr/bin/perl

use strict;

use Fcntl qw( :DEFAULT :flock :seek );
use File::Spec;
use IO::Handle;

die "Usage: $0 startdir search replace\n"
    unless scalar @ARGV == 3;
my $startdir = shift @ARGV || '.';
my $search = shift @ARGV or
    die "Search parameter cannot be empty.\n";
my $replace = shift @ARGV;
$search = qr/\Q$search\E/o;

my @stack;

sub process_file($) {
    my $file = shift;
    my $fh = new IO::Handle;
    sysopen $fh, $file, O_RDONLY or
        die "Cannot read $file: $!\n";
    my $found;
    while(my $line = <$fh>) {
        if($line =~ /$search/) {
            $found = 1;
            last;
        }
    }
    if($found) {
        print "  Processing in $file\n";
        seek $fh, 0, SEEK_SET;
        my @file = <$fh>;
        foreach my $line (@file) {
            $line =~ s/$search/$replace/g;
        }
        close $fh;
        sysopen $fh, $file, O_WRONLY | O_TRUNC or
            die "Cannot write $file: $!\n";
        print $fh @file;
    }
    close $fh;
}

sub process_dir($) {
    my $dir = shift;
    my $dh = new IO::Handle;
    print "Entering $dir\n";
    opendir $dh, $dir or
        die "Cannot open $dir: $!\n";
    while(defined(my $cont = readdir($dh))) {
        next
            if $cont eq '.' || $cont eq '..';
        # Skip .swap files
        next
            if $cont =~ /^\.swap\./o;
        my $fullpath = File::Spec->catfile($dir, $cont);
        if($cont =~ /$search/) {
            my $newcont = $cont;
            $newcont =~ s/$search/$replace/g;
            print "  Renaming $cont to $newcont\n";
            rename $fullpath, File::Spec->catfile($dir, $newcont);
            $cont = $newcont;
            $fullpath = File::Spec->catfile($dir, $cont);
        }
        if(-l $fullpath) {
            my $link = readlink($fullpath);
            if($link =~ /$search/) {
                my $newlink = $link;
                $newlink =~ s/$search/$replace/g;
                print "  Relinking $cont from $link to $newlink\n";
                unlink $fullpath;
                my $res = symlink($newlink, $fullpath);
                warn "Symlink of $newlink to $fullpath failed\n"
                    unless $res;
            }
        }
        next
            unless -r $fullpath && -w $fullpath;
        if(-d $fullpath) {
            push @stack, $fullpath;
        } elsif(-f $fullpath) {
            process_file($fullpath);
        }
    }
    closedir($dh);
}

if(-f $startdir) {
    process_file($startdir);
} elsif(-d $startdir) {
    @stack = ($startdir);
    while(scalar(@stack)) {
        process_dir(shift(@stack));
    }
} else {
    die "$startdir is not a file or directory\n";
}

Question 10

যদি ফোল্ডারে ফাইলগুলির নামের কিছু নিয়মিত নাম থাকে (যেমন ফাইল 1, ফাইল 2 ...) আমি চক্রের জন্য ব্যবহার করেছি।

for i in {1..10000..100}; do sed 'old\new\g' 'file'$i.xml > 'cfile'$i.xml; done