|
|
|
|
|
by belter
1280 days ago
|
|
ChatGPT made this nice COBOL program to create an S3 Bucket,a technical impossibility... IDENTIFICATION DIVISION.
PROGRAM-ID. CREATE-S3-BUCKET. ENVIRONMENT DIVISION.
CONFIGURATION SECTION. INPUT-OUTPUT SECTION. DATA DIVISION.
FILE SECTION. WORKING-STORAGE SECTION.
01 AWS-ACCESS-KEY PIC X(20).
01 AWS-SECRET-KEY PIC X(40).
01 BUCKET-NAME PIC X(255). PROCEDURE DIVISION.
CREATE-BUCKET.
MOVE AWS-ACCESS-KEY TO AWS-ACCESS-KEY-VAR
MOVE AWS-SECRET-KEY TO AWS-SECRET-KEY-VAR
MOVE BUCKET-NAME TO BUCKET-NAME-VAR
INVOKE AWS-S3 "CREATE-BUCKET" USING AWS-ACCESS-KEY-VAR AWS-SECRET-KEY-VAR BUCKET-NAME-VAR |
|