HTML kodolok szervezete inditott egy levelezesi ujsagot hwg-news neven.
Reszletekert nezz be a http://www.hwg.org cimre. Az alapveto, ingyenes
(basic) tagsagrol megprobalnak atiranyitani a kedvezmenyesre (value 20
USD), vagy a profira (plus 35 USD). Keresnek oktatokat, listavezetoket.
Viking
|
Itt van egy kis script (gifgraph), ami nehany parameterrel meghivva, es
egy adatfilet beletoltve egybol gif-et gyart. Ket dolog kell hozza, a
gnuplot, es a ppmtogif (netpbm csomagbol), ezeket konnyu megtalalni a
neten.
Jozsi.
#!/usr/bin/perl -s
$|=1;
if ( ! length($linelabels) ) {
print "Usage: gifgraph -linelabels='a b c ...' -title=...",
" -xlabel=... -ylabel=... < datafile\n";
exit;
}
close(STDERR);
open(STDERR, ">/dev/null");
open(TMP, ">/tmp/gnuplot.dat");
print TMP <STDIN>;
close(TMP);
open(GNUPLOT, "|/usr/local/bin/gnuplot|/usr/local/bin/ppmtogif");
print GNUPLOT "set terminal pbm color\n";
if ( length($title) ) {
print GNUPLOT "set title '". $title ."'\n";
}
if ( length($xlabel) ) {
print GNUPLOT "set xlabel '". $xlabel ."'\n";
}
if ( length($ylabel) ) {
print GNUPLOT "set ylabel '". $ylabel ."'\n";
}
print GNUPLOT "set autoscale
plot ";
foreach (split(" ", $linelabels)) {
if ( $c ) { print GNUPLOT ", "; }
print GNUPLOT "'/tmp/gnuplot.dat' using 1:",++$c+1," title '",$_,
"' with lines ";
}
print GNUPLOT "\n";
close(GNUPLOT);
unlink("/tmp/gnuplot.dat");
exit(0);
|