The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

iPodDB::Status - iPodDB Status bar

SYNOPSIS

        my $status = iPodDB::Status->new( $frame );
        $status->songs( $songs );
        $status->time( $time );
        $status->size( $size );

DESCRIPTION

This adds a status bar to the main iPodDB window. It keeps track of the number of songs, the total length of the songs and the total size on disk of the files.

METHODS

new( $frame )

Creates the status bar, with 3 columns (and one other for help text).

songs( [ $songs ] )

Gets / sets the songs column in the status bar.

time( [ $time ] )

Gets / sets the time column in the status bar. It should be passed in as thousands of seconds.

size( [ $size ] )

Gets / Sets the size column in the status bar. It should be passed in as bytes.

AUTHOR

  • Brian Cassidy <bricas@cpan.org>

COPYRIGHT AND LICENSE

Copyright 2004 by Brian Cassidy

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.