vpnclient_sis/group/create_vpnclient_sis.pl
branchRCL_3
changeset 41 e06095241a65
parent 40 473321461bba
equal deleted inserted replaced
40:473321461bba 41:e06095241a65
    20 use POSIX qw(strftime);
    20 use POSIX qw(strftime);
    21 use File::Copy;
    21 use File::Copy;
    22 
    22 
    23 
    23 
    24 #Subroutines to update version information
    24 #Subroutines to update version information
    25 my $PLATFORM = "50";
    25 my $PLATFORM = "42";
    26 
    26 
    27 #
    27 #
    28 # Creates a temp file and replaces line
    28 # Creates a temp file and replaces line
    29 #
    29 #
    30 sub replace_line_and_create_temp
    30 sub replace_line_and_create_temp