>print CADOUT "$SymbolDecode{$atoms[1]}(-$halfwidth,$halfheight,$halfwidth$,-$halfheight)$mcEol"; print CADOUT "$SymbolDecode{$atoms[1]}(-$halfwidth,$halfheight,$halfwidth,-$halfheight)$mcEol"; $, Nuts.The extra $ sign was really there! Works fine without it. Sorry to bother you all. $, must be one of those predefined variables so there was no error warning with -w. -- -> From the U S of A, the only socialist country that refuses to admit it. <- # ===== Want to unsubscribe from this list? # ===== Send mail with body "unsubscribe" to macperl-request@macperl.org