diff --git a/libraries/libapparmor/swig/perl/examples/example.pl b/libraries/libapparmor/swig/perl/examples/example.pl
index 8a571bb53..3e316f1c1 100644
--- a/libraries/libapparmor/swig/perl/examples/example.pl
+++ b/libraries/libapparmor/swig/perl/examples/example.pl
@@ -1,10 +1,10 @@
 require LibAppArmor;
 
-$msg = "type=APPARMOR msg=audit(1168662182.495:58): PERMITTING r access to /home/matt/projects/change_hat_test/test (test_hat(27871) profile /home/matt/projects/change_hat_test/test_hat active null-complain-profile)";
+$msg = 'type=APPARMOR_ALLOWED msg=audit(1257283891.471:2232): operation="file_perm" pid=4064 parent=4002 profile="/usr/bin/gedit" requested_mask="w::" denied_mask="w::" fsuid=1000 ouid=1000 name="/home/jamie/.gnome2/accels/gedit"';
 
 my($test) = LibAppArmorc::parse_record($msg);
 
-if (LibAppArmor::aa_log_record::swig_event_get($test) == $AppArmorLogRecordParser::AA_RECORD_ALLOWED )
+if (LibAppArmor::aa_log_record::swig_event_get($test) == $LibAppArmor::AA_RECORD_ALLOWED )
 {
 	print "AA_RECORD_ALLOWED\n";
 }