We're back to 356.

/o/&&print+chr(p);
---
/o/&&print+chr p;
[download]

Update: I'm not positive, as I don't know the language, but I think the following can also be done:

$0=p,$_=p,v int$_/$0,$_%$0if/e/;
---
v int($_=p)/($0=p),$_%$0if/e/;
[download]

Saves 2 characters. As I only have one very simple test program, it may not be exercising that spot very well.

** FUNGICIDE **
-- Fungus calendar --
CURTSEY:
        Fungal toe!  Fungal toe!  Fungal hoe!
                -- (Burnt programmer nucleus)
        Ooooooo!
CRUDDY 2nd TOE:
        Nine(!) fungal hyaena toe5!
        Dungy alfalfa, penalty superlunary -- Oh, blubber!
        Ooooooo!
[download]

Update2: With the same caveat ...

/s/&&v-(p)+p;
---
/s/&&v+p-p;
[download]

------
We are the carpenters and bricklayers of the Information Age.

Don't go borrowing trouble. For programmers, this means Worry only about what you need to implement.