![]() |
Bonjour et bienvenu par les États-Unis à la UNIX et Linux Forums! Merci de votre visite et vous joindre à notre communauté mondiale.
|
|
google unix.com
|
|||||||
| Forums | S'inscrire | Forum Rules | Liens | Albums | FAQ | Liste des membres | Calendrier | Recherche | Aujourd'hui, les postes | Marquer les forums comme lus |
| De programmation et de script Shell Posez vos questions à propos de KSH, CSH, SH, BASH, PERL, PHP, SED, awk et d'autres scripts shell et les langages de script shell ici. |
Plus d'UNIX et Linux Forum Sujets Vous trouverez peut-être utile
|
||||
| Fil | Thread Starter | Forum | Réponses | Last Post |
| ne peuvent pas obtenir l'enchaînement logique de awk | user_prady | De programmation et de script Shell | 7 | 12-10-2007 03:09 AM |
| Concatenation de fichier | samit_9999 | UNIX pour les nuls Questions et réponses | 3 | 11-21-2006 06:26 AM |
| concaténation de chaînes | systemsb | UNIX pour les nuls Questions et réponses | 7 | 04-04-2006 01:03 PM |
| Mise en œuvre Concatenation (cat) | toughguy2handle | High Level Programming | 2 | 09-22-2005 03:10 AM |
| Concaténation | videsh77 | De programmation et de script Shell | 2 | 12-14-2004 06:13 AM |
![]() |
|
|
LinkBack | Thread Tools | Recherche sur ce Thread | Rate Thread | Modes d'affichage |
|
|
|
||||
|
Concaténation
Comment puis-je faire ceci:
date \u003d 4 -----------> 04 Mois \u003d 3 -----------> 03 Je souhaite faire une varibale nom var1 qui tiendra la valeur de la date du jour et le mois de valeur en tant que: 2 chiffres pour la date. 2 chiffres pour le mois. Donc finalement var1 tenir valeur 0403 --- MMJJ |
|
||||
|
Citation:
Essayez cette Code:
$DB_Date=sprintf("%02d%02d", $date, $Month);
|
|
||||
|
Code:
#!/bin/perl -w
use IO::Handle;
($day, $month, $year) = (localtime)[3,4,5];
$month=$month+1;
$year=$year+1700;
$DB_Date=printf("%02d%02d", $date, $Month);
open (dbfile, "/data1/scp/store/DB/0403/SCP_PP_SUBS.dat") or die "Couldn't get at THE FILE";
@data;
$credit;
$count =0;
print "DB_Date:: $DB_Date \n\n";
print "LESS then the 100 Credit $day/$month/$year\n\n";
print "-------------------------------------------\n";
while (<dbfile>)
{
........................
..........................
............................
...........................
Do some file parsing operation
}
print "Total Count: $count \n";
close dbfile;
|
![]() |
| Bookmarks |
| Thread Tools | Recherche sur ce Thread |
| Modes d'affichage | Rate this thread |
|
|