#!/usr/bin/perl -w # # Declare versions that will be used in cb # Those are filtered with pb mecanism # and have been isolated here to avoid unrelated effects # package CasparBuster::Version; use strict; # Inherit from the "Exporter" module which handles exporting functions. use vars qw($VERSION $REVISION @ISA @EXPORT); use Exporter; # Export, by default, all the functions into the namespace of # any code which uses this module. our @ISA = qw(Exporter); our @EXPORT = qw(cb_version_init); $VERSION = "PBVER"; $REVISION = "PBREV"; sub cb_version_init { my $ver = $VERSION; my $rev = $REVISION; return($ver,$rev); } 1;