map { $val .= sprintf("%02x",$_) } unpack "CCCCCC", $octetstr;
####
$val .= sprintf("%02x",$_) for unpack "CCCCCC", $octetstr;
##
##
# result from map is discarded
# side effect: $val is populated
map { $val .= sprintf("%02x",$_) } unpack "CCCCCC", $octetstr;
# result from print is discarded (1 if successful)
# side effect: text appears on STDOUT or selected filehandle
print "hello, world!\n";
# result from assignment is 42, again discarded
# side effect: $value is populated
$value = 42;
# result from die is discarded (if any), print not done
# side effect: well...
print die;