branch | RCL_3 |
changeset 41 | e06095241a65 |
parent 40 | 473321461bba |
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 |