The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
digraph L0 {
	size = "8,8";
	ordering=out;
	node [shape = box];

	n0 [label="E"];
	n1 [label="T"];
	n2 [label="F"];
	n3 [label="IDENT : a "];
	n4 [label="+"];
	n5 [label="T"];
	n6 [label="F"];
	n7 [label="("];
	n8 [label="E"];
	n9 [label="T"];
	n10 [label="F"];
	n11 [label="IDENT : b "];
	n12 [label="*"];
	n13 [label="F"];
	n14 [label="IDENT : c "];
	n15 [label=")"];
	n16 [label="*"];
	n17 [label="F"];
	n18 [label="("];
	n19 [label="E"];
	n20 [label="T"];
	n21 [label="F"];
	n22 [label="IDENT : d "];
	n23 [label="*"];
	n24 [label="F"];
	n25 [label="IDENT : e "];
	n26 [label="+"];
	n27 [label="T"];
	n28 [label="F"];
	n29 [label="("];
	n30 [label="E"];
	n31 [label="T"];
	n32 [label="F"];
	n33 [label="IDENT : a "];
	n34 [label="*"];
	n35 [label="F"];
	n36 [label="IDENT : b "];
	n37 [label=")"];
	n38 [label=")"];
	n39 [label="+"];
	n40 [label="T"];
	n41 [label="F"];
	n42 [label="IDENT : q "];
	n0 ->	{ n1 n4 n5 n39 n40 };
	n1 ->	n2 ;
	n2 ->	n3 ;
	n5 ->	{ n6 n16 n17 };
	n6 ->	{ n7 n8 n15 };
	n8 ->	n9 ;
	n9 ->	{ n10 n12 n13 };
	n10 ->	n11 ;
	n13 ->	n14 ;
	n17 ->	{ n18 n19 n38 };
	n19 ->	{ n20 n26 n27 };
	n20 ->	{ n21 n23 n24 };
	n21 ->	n22 ;
	n24 ->	n25 ;
	n27 ->	n28 ;
	n28 ->	{ n29 n30 n37 };
	n30 ->	n31 ;
	n31 ->	{ n32 n34 n35 };
	n32 ->	n33 ;
	n35 ->	n36 ;
	n40 ->	n41 ;
	n41 ->	n42 ;
}