Re: Saving the first frame of any image

# remove all the junk in our filename
$filename =~ s/^.*[\\\/]//;
[download]

Does not remove all the junk in your filename (you should be using taint, perldoc perlsec). This still has potential for abuse. Adding something like

$filename = pack 'H*', $filename;
[download]

after that substitution ought to remedy that.

MJD says "you can't just make shit up and expect the computer to know what you mean, retardo!"
I run a Win32 PPM repository for perl 5.6.x and 5.8.x -- I take requests (README).
** The third rule of perl club is a statement of fact: pod is sexy.

Comment on Re: Saving the first frame of any image Select or Download Code

MJD says "you can't just make shit up and expect the computer to know what you mean, retardo!"
I run a Win32 PPM repository for perl 5.6.x and 5.8.x -- I take requests (README).
** The third rule of perl club is a statement of fact: pod is sexy.