--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/featuremgmt/featuremgr/tools/datfilehelpers/ShowFeatContent.pl	Fri Jan 22 11:06:30 2010 +0200
@@ -0,0 +1,49 @@
+#!perl -w
+# Copyright (c) 2007-2009 Nokia Corporation and/or its subsidiary(-ies).
+# All rights reserved.
+# This component and the accompanying materials are made available
+# under the terms of "Eclipse Public License v1.0"
+# which accompanies this distribution, and is available
+# at the URL "http://www.eclipse.org/legal/epl-v10.html".
+#
+# Initial Contributors:
+# Nokia Corporation - initial contribution.
+#
+# Contributors:
+#
+# Description:
+# This simple script shows how to display the content of a feature manager
+# data file.
+# 
+#
+
+use strict;
+use fmcreate;
+
+#
+# Find out what file the user is interested in..
+# Make sure it's specified and exists.
+#
+my $datfile = $ARGV[-1];
+die "Usage: showfeatcontent.pl <featmanager-data-filename>"
+    unless(defined($datfile));
+die "Specify an existing file" unless(-f $datfile);
+
+#
+# Create an object that represents a feature data file.
+#
+my $fmc = FMCreate->new();
+
+#
+# Load the content of the data file into our FMCreate object.
+# Note that this will die if the content does not seem to be a feature set
+# file. This can happen if the first four bytes aren't 'feat' or if reading
+# the file fails at any point. This will also happen if the file is the wrong
+# size.
+#
+$fmc->LoadUp($datfile);
+
+#
+# Display the content.
+#
+$fmc->ShowALL();