'digraph Perl {
 graph [ compound="true" label="Macro demo 5 - Compound cluster sub-graphs" rankdir="TB" ]
 edge [ color="grey" ]

 subgraph "cluster 1" {
  graph [ label="cluster 1" ]
  node [ color="magenta" shape="diamond" ]
  "Chadstone" [ shape="hexagon" ]
  "Waverley" [ color="orange" ]
  "Chadstone" -> "Waverley"
 }

 subgraph "cluster 2" {
  graph [ label="cluster 2" ]
  node [ color="magenta" shape="diamond" ]
  "Hughesdale" [ shape="hexagon" ]
  "Notting Hill" [ color="orange" ]
  "Hughesdale" -> "Notting Hill"
 }
 "Chadstone" -> "Notting Hill" [ lhead="cluster 2" ltail="cluster 1" minlen="2" ]
}
'
