print $SCALAR LIST
print $SCALAR
print BLOCK LIST
print BLOCK
print LIST
print

##</code><code>##

print $ads{$this_ad} "$line\n";

##</code><code>##

print { $ads{$this_ad} } "$line\n";

##</code><code>##

$ads{$this_ad}->print("$line\n");