chubler_XL is correct. I use 5 spaces indentation and if a line doesn't fit within 80 characters i think hard if it is really good to do it that way (in most cases it isn't and it is the rare exception if it is).
To reduce the indentation in sed (replace "<b>" and "<t>" with literal blanks/tabs):
You can easily adapt this to other levels of indentation by modifying the parts marked bold to contain more or less blanks. Note that lines have to start leftmost - no effort is made to deal with lines not starting at character position 1.
hi,
we are going for a new unix box and the ip and DNS name has to be changed in all the scripts, where ever it is hard coded.
i was trying the below mentioned command to list all such scripts where the ip/dns name is hard coded:
find / -type f -print | xargs grep -l "ip address" >>... (0 Replies)
Hi,
Using GNU indent(1) I tried to indent a C source file which has no indentation (all lines start at column 1). The result I am trying to achieve, should look like this with the exception that only tabs are used for indentation (no spaces). Unfortunately, I couldn't find the appropriate... (1 Reply)
I would like to make the same change in multiple shell script files and would like to know if anyone can be of some help? I would appreciate it. (4 Replies)
So a script is working properly (tested many times) , then you add a new fine piece of code ,finaly its fails generally with a syntax error at the last line of the script.
:confused:... does anybody why this happens?
>uname -a
HP-UX test... (4 Replies)
Hi
I have coded 300 line script.Its not indented properly.i am not good at indentation.
I would appreciate your help on this.
i want to use a 4 space indentataion.Hence if i "set tabstop=4" and use tabs for coding and if some one else open
this script in their system it looks unindented since... (11 Replies)
What files or programs have the ability to change your default network scripts and config files? All 3 of these very important files got changed on their own.
/etc/sysconfig/network-scripts/ifcfg-wlan0
/etc/sysconfig/networking/devices/ifcfg-wlan0... (4 Replies)
@echo off
SET "p0=%~0"
SET "p1=%~1"
SET "p2=%~2"
SET "p3=%~3"
SET "p4=%~4"
SET "p5=%~5"
SET "p6=%~6"
SET "p7=%~7"
SET "p8=%~8"
SET "p9=%~9"
SHIFT
SET "p10=%~9"
SHIFT
SET "p11=%~9"
SET "zip_path=D:\OraOutput\interco\%p10%"
echo Program... (5 Replies)
1. The problem statement, all variables and given/known data:
I need to write an awk program who does this (sorry its too big)
http://i.stack.imgur.com/yzSqB.jpg
2. Relevant commands, code, scripts, algorithms:
..
3. The attempts at a solution (include all code and scripts):
declaring a... (2 Replies)
An writing some html instructions to have text beside an image. The image
is located on the left and I want the tect to appear on the right side of the image.
The text includes a list. The problem is that the list boxes and not shifted.
The text within the list align on the left with the... (20 Replies)
Discussion started by: kristinu
20 Replies
LEARN ABOUT DEBIAN
text::findindent
Text::FindIndent(3pm) User Contributed Perl Documentation Text::FindIndent(3pm)NAME
Text::FindIndent - Heuristically determine the indent style
SYNOPSIS
use Text::FindIndent;
my $indentation_type = Text::FindIndent->parse($text, skip_pod => 1);
if ($indentation_type =~ /^s(d+)/) {
print "Indentation with $1 spaces
";
}
elsif ($indentation_type =~ /^t(d+)/) {
print "Indentation with tabs, a tab should indent by $1 characters
";
}
elsif ($indentation_type =~ /^m(d+)/) {
print "Indentation with $1 characters in tab/space mixed mode
";
}
else {
print "Indentation style unknown
";
}
DESCRIPTION
This is a module that attempts to intuit the underlying indent "policy" for a text file (most likely a source code file).
METHODS
parse
The class method "parse" tries to determine the indentation style of the given piece of text (which must start at a new line and can be
passed in either as a string or as a reference to a scalar containing the string).
Returns a letter followed by a number. If the letter is "s", then the text is most likely indented with spaces. The number indicates the
number of spaces used for indentation. A "t" indicates tabs. The number after the "t" indicates the number characters each level of
indentation corresponds to. A "u" indicates that the indenation style could not be determined. Finally, an "m" followed by a number means
that this many characters are used for each indentation level, but the indentation is an arbitrary number of tabs followed by 0-7 spaces.
This can happen if your editor is stupid enough to do smart indentation/whitespace compression. (I.e. replaces all indentations many tabs
as possible but leaves the rest as spaces.)
The function supports parsing of "vim" modelines. Those settings override the heuristics. The modeline's options that are recognized are
"sts"/"softtabstob", "et"/"noet"/"expandtabs"/"noexpandtabs", and "ts"/"tabstop".
Similarly, parsing of "emacs" Local Variables is somewhat supported. "parse" use explicit settings to override the heuristics but uses
style settings only as a fallback. The following options are recognized: "tab-width", "indent-tabs-mode", "c-basic-offset", and "style".
There is one named option that you can pass to "parse()": "skip_pod". When set to true, any section of POD (see perlpod) will be ignored
for indentation finding. This is because verbatim paragraphs and examples embedded in POD or quite often indented differently from normal
Perl code around the POD section. Defaults to false. Example:
my $mode = Text::FindIndent->parse($text, skip_pod => 1);
to_vim_commands
A class method that converts the output of "parse($text)" into a series of vi(m) commands that will configure vim to use the detected
indentation setting. Returns zero (failure) or more lines of text that are suitable for passing to "VIM::DoCommand()" one by one.
As a convenience, if the argument to "to_vim_commands" doesn't look like the output of "parse", it is redirected to "parse" first.
To use this, you can put the following line in your .vimrc if your vim has Perl support. Suggestions on how to do this in a more elegant
way are welcome. The code should be on one line but is broken up for displaying:
map <F5> <Esc> :perl use Text::FindIndent;VIM::DoCommand($_) for
Text::FindIndent->to_vim_commands(join "
", $curbuf->Get(1..$curbuf->Count()));<CR>
(Patches to implement the equivalent for emacs would be welcome as well.)
SUPPORT
Bugs should be reported via the CPAN bug tracker at
<http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Text-FindIndent>
For other issues, contact the author.
AUTHOR
Steffen Mueller <smueller@cpan.org>
Adam Kennedy <adamk@cpan.org>
COPYRIGHT
Copyright 2008 - 2010 Steffen Mueller.
Copyright 2008 - 2010 Adam Kennedy,
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
The full text of the license can be found in the LICENSE file included with this module.
perl v5.10.1 2011-01-04 Text::FindIndent(3pm)