digraph Perl { graph [ rankdir="TB" ] node [ shape="oval" ] edge [ color="grey" ] "" [ color="red" ] }