IWETHEY v. 0.3.0 | TODO
1,095 registered users | 0 active users | 0 LpH | Statistics
Login | Create New User
IWETHEY Banner

Welcome to IWETHEY!

IWETHEY Home / IWETHEY Board / Whither Scripting? Forum / That was all an inside joke, right?
Post #323,530
by drook
Picture of drook
3/26/10 1:05:01 PM
Reply
New That was all an inside joke, right?
There weren't enough characters there to actually do anything useful.
--

Drew
Post #323,532
by boxley
3/26/10 2:03:38 PM
Reply
New no works as advertized
If we torture the data long enough, it will confess. (Ronald Coase, Nobel Prize for Economic Sciences, 1991)
Post #323,543
by crazy
3/26/10 8:03:30 PM
Reply
New Sigh
Must be pebkac.

Current dir:
$ l
total 12
-rwxr-xr-x 1 broom broom 162 2010-03-26 19:55 add_file_size.pl
-rwxr-xr-x 1 broom broom 608 2010-03-26 19:55 make_self_contained.pl
-rwxr-xr-x 1 broom broom 657 2010-03-26 19:55 maketests.pl

Execute it:
$ find . -print | ./add_file_size.pl
Total: 1427

Figure what the sizes should be:
$ bc
bc 1.06
Copyright 1991-1994, 1997, 1998, 2000 Free Software Foundation, Inc.
This is free software with ABSOLUTELY NO WARRANTY.
For details type `warranty'.
162+608+657
1427

It matches.

The script file contains the following:

$ cat add_file_size.pl 

#!/usr/bin/perl -w

#

use strict;



my $size = 0;

while(<>){

        chomp;

        next unless (-f $_);

        my $file_size = -s $_;

        $size += $file_size;

}

print "Total: $size\n";


Post #323,546
by boxley
3/26/10 8:18:18 PM
Reply
New sorry, no, works as advertized. My bad forgot comma
If we torture the data long enough, it will confess. (Ronald Coase, Nobel Prize for Economic Sciences, 1991)
Post #323,545
by crazy
3/26/10 8:04:34 PM
Reply
New Don't show it to Ben.
He'd do it in one line. More line noise than characters. And it would be brilliant.
     aarrgg, brain dead - (boxley) - (33) - March 25, 2010, 03:23:35 PM EDT
         {print $5+1}? Or did I totally misread the question? -NT - (scoenye) - (32) - March 26, 2010, 07:56:59 AM EDT
             trying to get a running total, not increment - (boxley) - (31) - March 26, 2010, 08:31:59 AM EDT
                 Here, feed this filenames. - (crazy) - (8) - March 26, 2010, 10:18:14 AM EDT
                     I dont quite get this - (boxley) - (7) - March 26, 2010, 10:42:25 AM EDT
                         -s - (crazy) - (6) - March 26, 2010, 11:29:49 AM EDT
                             Ah, got it. thanx! -NT - (boxley) - (5) - March 26, 2010, 11:43:46 AM EDT
                                 That was all an inside joke, right? - (drook) - (4) - March 26, 2010, 01:05:01 PM EDT
                                     no works as advertized -NT - (boxley) - (2) - March 26, 2010, 02:03:38 PM EDT
                                         Sigh - (crazy) - (1) - March 26, 2010, 08:03:30 PM EDT
                                             sorry, no, works as advertized. My bad forgot comma -NT - (boxley) - March 26, 2010, 08:18:18 PM EDT
                                     Don't show it to Ben. - (crazy) - March 26, 2010, 08:04:34 PM EDT
                 Or like this... (using find) - (scoenye) - (21) - March 26, 2010, 11:04:46 PM EDT
                     Yup, find is magic - (crazy) - (10) - March 27, 2010, 07:46:21 AM EDT
                         s/magic/magic mushrooms/ - (pwhysall) - March 27, 2010, 10:18:13 AM EDT
                         My feelings exactly aboout Perl ;-) - (scoenye) - (8) - March 27, 2010, 08:40:27 PM EDT
                             I've tried to learn Perl several times. - (static) - (7) - March 28, 2010, 06:34:49 AM EDT
                                 Learning Perl is like learning a core language facility - (crazy) - (6) - March 28, 2010, 06:06:51 PM EDT
                                     What's the point? - (malraux) - (5) - March 28, 2010, 07:08:18 PM EDT
                                         Ah, welcome to the expanding fray - (crazy) - (4) - March 28, 2010, 07:12:26 PM EDT
                                             I hopped from Perl to Python... - (pwhysall) - (2) - March 29, 2010, 01:08:40 AM EDT
                                                 Yeah, but - (crazy) - (1) - March 29, 2010, 04:32:23 AM EDT
                                                     No, it's fine. I don't consider myself a programmer. - (pwhysall) - March 29, 2010, 09:03:51 AM EDT
                                             Quite. - (static) - March 29, 2010, 06:57:59 PM EDT
                     I like - (boxley) - (1) - March 27, 2010, 11:01:24 AM EDT
                         The - means "standard input" - (scoenye) - March 27, 2010, 08:28:08 PM EDT
                     oh well doesnt work in solaris - (boxley) - (7) - March 29, 2010, 09:32:54 AM EDT
                         apt-get install ubuntu FTW! -NT - (drook) - (3) - March 29, 2010, 09:34:12 AM EDT
                             sorry, we have standards, snicker -NT - (boxley) - (2) - March 29, 2010, 09:36:14 AM EDT
                                 GNU find from blastwave? -NT - (pwhysall) - (1) - March 29, 2010, 09:47:22 AM EDT
                                     That's how I'd go - (jake123) - March 29, 2010, 02:58:41 PM EDT
                         Solaris style... - (scoenye) - (2) - March 29, 2010, 09:15:48 PM EDT
                             thanx - (boxley) - (1) - March 29, 2010, 10:34:29 PM EDT
                                 Happy to help - (crazy) - March 30, 2010, 07:08:22 AM EDT

On bassline: Martina Nav... Navri... gosh, I wish she'd get married.
76 ms