#!/usr/bin/perl ############################################################################## # SSI Random Image Displayer Version 1.2 # # Copyright 1996 Matt Wright mattw@scriptarchive.com # # Created 7/1/95 Last Modified 11/4/95 # # Scripts Archive at: http://www.scriptarchive.com/ # ############################################################################## # COPYRIGHT NOTICE # # Copyright 1996 Matthew M. Wright All Rights Reserved. # # # # SSI Random Image may be used and modified free of charge by anyone so # # long as this copyright notice and the comments above remain intact. By # # using this this code you agree to indemnify Matthew M. Wright from any # # liability that might arise from it's use. # # # # Selling the code for this program without prior written consent is # # expressly forbidden. In other words, please ask first before you try and # # make money off of my program. # # # # Obtain permission before redistributing this software over the Internet or # # in any other medium. In all cases copyright and header must remain intact.# ############################################################################## # Define Variables $basedir = "http://www.tubenet.org.uk/"; @images = ("manc9.gif","freedomanim2.gif","hydro2.gif","outo.gif","tgpro4.gif","omni7.gif","hahn2.gif","ercolina6.gif","vanle.gif","t-d-banner899d.gif","ti.gif","kent3.gif"); @urls = ( "http://www.tubenet.org.uk/cgi/redirect.pl?http://www.manchestertoolanddie.com\" target=\"_blank\"", "http://www.tubenet.org.uk/cgi/redirect.pl?http://www.freedommachinery.com\" target=\"_blank\"", "http://www.tubenet.org.uk/cgi/redirect.pl?http://heat-transfer.hydro.com\" target=\"_blank\"", "http://www.tubenet.org.uk/cgi/redirect.pl?http://www.outokumpu.com\" target=\"_blank\"", "http://www.tubenet.org.uk/cgi/redirect.pl?http://www.tgpro.co.th\" target=\"_blank\"", "http://www.tubenet.org.uk/cgi/redirect.pl?http://www.omnibend.com\" target=\"_blank\"", "http://www.tubenet.org.uk/cgi/redirect.pl?http://www.s-k-h.com\" target=\"_blank\"", "http://www.tubenet.org.uk/cgi/redirect.pl?http://www.ercolina.it\" target=\"_blank\"", "http://www.tubenet.org.uk/cgi/redirect.pl?http://www.vanleeuwen.nl\" target=\"_blank\"", "http://www.tubenet.org.uk/cgi/redirect.pl?http://www.t-drill.fi\" target=\"_blank\"", "http://www.tubenet.org.uk/cgi/redirect.pl?http://www.bundy.com\" target=\"_blank\"", "http://www.tubenet.org.uk/cgi/redirect.pl?http://www.continuouscoil.com\" target=\"_blank\"" ); @alt = ( "Manchester Tool and Die", "Freedom Machinery", "Heat Transfer", "Outokumpu", "Thai-German Products", "Omni X", "Stahlkontor Hahn", "Ercolina", "Van Leeuwen", "T-DRILL", "TI Automotive", "Kent Tesgo" ); ############################################################################## # Options $uselog = "0"; # 1 = YES; 0 = NO $logfile = "/path/to/log/file"; $date = `/usr/bin/date`; chop($date); $link_image = "1"; # 1 = YES; 0 = NO $align = "middle"; $border = "1"; # Done ############################################################################## srand(time ^ $$); $num = rand(@images); # Pick a Random Number # Print Out Header With Random Filename and Base Directory print "Content-type: text/html\n\n"; if ($link_image eq '1' && $urls[$num] ne "") { print ""; } print ""; if ($link_image eq '1' && $urls[$num] ne "") { print ""; } print "\n"; # If You want a log, we add to it here. if ($uselog eq '1') { open(LOG, ">>$logfile"); print LOG "$images[$num] - $date - $ENV{'REMOTE_HOST'}\n"; close(LOG); }

WORKING WITH COPPER TUBE

IV. Bending
General Considerations

V. Joining
Introduction
Fittings
Solders
Fluxes

VI. Soldered Joints
Introduction
Measuring and Cutting
Reaming
Cleaning
Applying Flux
Assembly and Support
Heating
Applying Solder
Cleaning and Cooling
Testing

VII. Brazed Joints
Introduction
Brazing Filler Metals
Fluxes
Assembly
Applying Heat and Brazing
Horizontal and Vertical Joints
Removing Residue
General Hints and Suggestions
Testing
Purging

VIII. Flared Joints
Flared Joints

IX. Additional Joining Methods
General Information