##
level=3,
Specifying Rest Arguments in a Procedure Definition
####
Introduction to Arguments
####
Specifying Rest Arguments in a Procedure Definition
####
$text =~ s/)]*?)level=(.{1})([^(<\/heading>)]*?)<\/heading>/$1$3<\/heading$2>/gsix;