Help for this page

Select Code to Download


  1. or download this
    `sed 's/^ \{2,\}//' -i filename.html`;
    
  2. or download this
    system('sed','s/^ \{2,\}//', '-i', 'filename.html') == 0
        or die "Couldn't launch sed: $! / $?";
    
  3. or download this
    use Tie::File;
    my $filename = 'filename.html';
    ...
    for (@file) {
        s/^ {2}//;
    };