co delam spatne na konverzi souboru
Milan Sorm
xsorm na informatics.muni.cz
Pondělí Květen 22 22:16:12 MEST 2000
co na tomto je spatne ?
my $temp = '/tmp/wbmp.'.time.$$.'.';
$ENV{PATH} = '';
no strict;
sysopen F,"/tmp/".$temp."jpg",O_RDWR|O_CREAT|O_EXCL or die $!;
use strict;
syswrite F,$wbmp,length($wbmp);
close F;
system 'cd /tmp ; /usr/X11R6/bin/convert JPG:- PBM:- '.
'| /usr/bin/pbmtowbmp - >/tmp/'.$temp.'wbmp';
no strict;
sysopen F,"/tmp/".$temp."wbmp",O_READ or die $!;
use strict;
my $wbmp = '';
sysread F,$wbmp,50000;
close F;
snazim se $wbmp (JPEG) prevest na $wbmp (WBM)
ale pada mi to na prvnim die $! s tim, ze to neni soubor ani adresar. to je
prece blbost. do /tmp psat muzu.
--milan
Další informace o konferenci Perl