/[Frey]/trunk/lib/Frey/Path.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/lib/Frey/Path.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 681 by dpavlin, Sat Nov 1 00:58:24 2008 UTC revision 682 by dpavlin, Tue Dec 2 17:36:51 2008 UTC
# Line 19  sub mkbasepath { Line 19  sub mkbasepath {
19          mkpath $base_path if ! -e $base_path;          mkpath $base_path if ! -e $base_path;
20  }  }
21    
22    =head2 path_size
23    
24      my $path_size_bytes = $self->path_size( 'lib/path' );
25    
26    =cut
27    
28    sub path_size {
29            my ($self,$path) = @_;
30            $path .= ' ' . ( -s $path ) . ' bytes';
31            warn "# path_size: $path";
32            return $path;
33    }
34    
35  1;  1;
Legend:
Removed from v.681  
changed lines
  Added in v.682
  ViewVC Help
Powered by ViewVC 1.1.26