| # | Line 4 | Line 4 | use strict; | |
|---|---|---|
| 4 | $| = 1; | |
| 5 | ||
| 6 | # Directory to find images in | |
| 7 | < | my($dir) = "/web/i-scream/nwww/logos"; |
| 7 | > | my($dir) = "/web/i-scream/htdocs/logos"; |
| 8 | # Pattern to match images - remember to escape | |
| 9 | my($pattern) = "\\.jpg\$"; | |
| 10 | ||
| 11 | # Where the setbg command is | |
| 12 | < | my($setbg) = "/web/i-scream/nwww.bin/setbg.pl"; |
| 12 | > | my($setbg) = "/web/i-scream/bin/setbg.pl"; |
| 13 | ||
| 14 | # Code... | |
| 15 | print "Content-type: image/jpeg\n\n"; | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |
