Create Backup Copy of File Every N minutes

0 Likes

This Perl script creates backup copy of file every N minutes.


The Perl script works on the Server console.



Files:

bcpspc.pl

bcpspc.cfg



Example:

\\server\docum\wrk\home\user1\file.sxc

will be created every 15 min from 8:00 to the 21:00 files here:

\\server\docum\wrk\home\user1\bcp\yyyymmddhhmm.sxc if file.sxc is opened by user.



How to configure:



  1. create folder:

    sys:\etc\1bcpspc

  • create file

    sys:\etc\1bcpspc\bcpspc.cfg

    with info as in the attachment: bcpspc.cfg

  • put file bcpspc.pl to the folder: sys:\perl\scripts

  • create file: sys:\system\1bcpspc.ncf with this text:

    perl sys:\perl\scripts\bcpspc.pl

  • Create folders for BACKUP and LOG files (as in the example this will be:)

    \\server\docum\wrk\home\user1\bcp

    \\server\docum\wrk\home\user1\bcp\log

  • Create empt files:

    \\server\docum\wrk\home\user1\bcp\log\tfile.tsk

    \\server\docum\wrk\home\user1\bcp\log\lfile.tsk

  • Load from the server console: TBX.NLM

  • Run from the server console script:

    1bcpspc.ncf



This script, from the example, will create a Backup copy of file.sxc every 15 min.


This will be if file LOCK by user application.



How to stop the script:


Create the file: SYS:\bcpspc.txt


Before Run the script again, need RENAME SYS:\bcpspc.txt to the SYS:\bcpspc.tx


Tags:

Labels:

How To-Best Practice
Collateral
Comment List
Related
Recommended