Beefy Boxes and Bandwidth Generously Provided by pair Networks
go ahead... be a heretic
 
PerlMonks  

Re: Re: The One True Style of indentation:

by japhy (Canon)
on Apr 14, 2002 at 21:00 UTC ( #159007=note: print w/ replies, xml ) Need Help??


in reply to Re: The One True Style of indentation:
in thread The One True Style of indentation:

Yes! Another believer! Oh, and here's a utility script of mine, detab:

#!/usr/bin/perl -pi # can't use die() in BEGIN -- it looks funny :( BEGIN { $sp = shift or warn("usage: detab SP files...\n") and exit } s/^(\t+)/" " x ($sp * length $1)/eg;
To cleanse your nasty tabbed files, simply run detab 2 foo.pl, and your leading tabs are replaced with 2 spaces per tab. The way japhy intended.

_____________________________________________________
Jeff[japhy]Pinyan: Perl, regex, and perl hacker, who'd like a (from-home) job
s++=END;++y(;-P)}y js++=;shajsj<++y(p-q)}?print:??;


Comment on Re: Re: The One True Style of indentation:
Download Code
Re3: The One True Style of indentation:
by blakem (Monsignor) on Apr 15, 2002 at 03:15 UTC
    A slightly different way to do that:
    perl -pi -e 's/\G\t/ /g' foo.pl
    (Adapted from a "replace-leading-zeros-with-spaces" oneliner I seem to remember)

    Update: looks like the original came from merlyn after dominus offered a suggestion similar to japhy's

    -Blake

      Ummm-- I think that was a 'dictum', not a suggestion...

      –hsm

      "Never try to teach a pig to sing…it wastes your time and it annoys the pig."

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://159007]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (6)
As of 2014-08-21 11:39 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (134 votes), past polls