Stories
Slash Boxes
Comments
NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.

All the Perl that's Practical to Extract and Report

use Perl Log In

Log In

[ Create a new account ]

chiron (7362)

chiron
  (email not shown publicly)
http://hxnet.co.uk/

Just so you know, I'm a 17 year old student residing in the UK, studying four subjects at A level, between partying (woot) and coursework im a half-assed perl hacker

Journal of chiron (7362)

Friday October 20, 2006
01:58 PM

Perl Gui interface to Phillips GoGear

[ #31368 ]
About two years ago i bought a philips gogear mp3 player, it was ok, the main downside was lame software to load music on to it.

About a year ago it broke, i found it two weeks ago and through the magic of fist i fixed it ( apparently the hd needle gets stuck easily ).

I couldn't stand the software so i decided to write my own, not too hard i thought it uses sqlite, however i spent ages on working out the logic, in the end i ended up using a much better script from use.perl.org/~domm/ for the logic.

I then added the gui front end, making it easier to add & remove songs.

I spent some time then making it cross-platform as apparently activestate perl is happy with storing querys into an array, for use in a foreach ie:

my @ret = $main->getOpenFile(-multiple => 9999999, -filetypes => $types);
foreach my $path (@ret) {


However perl on linux isn't and i had to use:

my $ret = $main->getOpenFile(-multiple => 9999999, -filetypes => $types);
foreach my $path (@$ret) {


Hopefully it works ok, here it is. Thanks to Domm at http://use.perl.org/~domm/ for the original logic in his script here.

NOTE: God help me if someone actually opens more than 9999999 files
The Fine Print: The following comments are owned by whoever posted them. We are not responsible for them in any way.
 Full
 Abbreviated
 Hidden
More | Login | Reply
Loading... please wait.