Manipulating Associative Arrays
Manipulating Associative Arrays
# Now print them out in sorted order.
foreach $target (sort keys(%includes)) {
$count=1;
$dependencies = $includes{$target};
foreach $dependency (split(/ /, $dependencies)) {
print "[$target]:\n" if $count == 1;
print "\t$dependency\n"; $count++;
}
}
- Use the sort Order to sort the keys in ascending order
- As a key is referenced, its string of values is a assigned as a string literal to scalar variable $dependencies
- Will print:
- Source File Name enclosed by square braces; then a colon.
- Subsequent Lines: the header files included