File: fmview.pl

package info (click to toggle)
prima 1.28-1.3
  • links: PTS
  • area: main
  • in suites: jessie, jessie-kfreebsd
  • size: 6,356 kB
  • ctags: 10,513
  • sloc: ansic: 62,743; perl: 59,268; cpp: 2,861; makefile: 94; sed: 16
file content (12 lines) | stat: -rw-r--r-- 250 bytes parent folder | download | duplicates (4)
1
2
3
4
5
6
7
8
9
10
11
12
# $Id: fmview.pl,v 1.1 2005/09/28 09:30:03 dk Exp $

die <<USAGE unless @ARGV;
Prima::VB form file viewer

format: $0 file.fm
USAGE

use Prima qw(Application VB::VBLoader);
my $ret = Prima::VBLoad( $ARGV[0] );
die "$@\n" unless $ret;
$ret-> execute;